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I | ソフ ト 、/ 種 類 セ ッ ト で 新 発 売 
3 % 704 
š 
| "JOY JOY PAOK 標準 価格 16.800 円 
| A (②「 野 球 狂 」 E 
0. ワー ブロ 「 iB; 誰 6 が 知っ て いる 野球 の ルー ル で 単純 Boe FY An 
| (J BRR Mek 明快 。 家族 団らん で 楽し め る ソフ ト で +. Ce 27 mn i : 
家庭 に お いて も 十分 利用 価値 が ある 日 本 NDEs > 楽し い 画像 で クリ スマ ス や 誕生 パーテ ィ | 
語 ワー プロ の 機能 を 紹介 し ます OL EPITAF = ー を 効果 的 に 演出 で きる ソフ ト で も | 
ж 誰 で も 簡単 に 音楽 を 入力 で き 、 完 成 し た | 
(の 「 マ リオ プラ ザー ズ ス ペ シ ャ ル 」 w: ょ その まま カセ モット に 録音 で きま れ (7) 「BASIC 学 習 ソ フト 」 Ë 
テー ラル ゲー ム と し て 知名 度 が 高く 、 幅 広 (2/ リ 『 示 ホーム ダイ アリ ты 画面 と の 対話 形式 で 学習 で き 、BASIC E 
い 年 令 層 に わた っ て 楽し め る ソフ ト で す 。 家庭 内 の 仕事 、 子 定 な ど を 入れ て みん な 理解 の 糸口 を 的 確 に 教え て くれ まあ | 
Мы 1 | で 活用 で きま す も カレ ンダ ーー 機能 付 。 
TVAR 2...) @ テ レビ 大 阪 9:30 一 10 :00 @ テ レビ 東京 9:30 一 10 :00 @ テ レビ 愛知 9:30 一 10:00 
Moi d " _ P >к чк pe fL @ 秋 田 テ レビ @ 福 島 テ レビ @ テ レビ 静岡 @ び わ 湖 放送 @ 奈 良 テ レビ @ テ レビ 和歌 山 @ 西 日 本 放送 @ 南 海 放送 @ 沖 縄 
毎週 He Н, MZ 1500 を 使っ た 楽し и Ж 好 at prp // テレ ビ @W 熊 本 県 民 テ レビ …※ 以下 の 放送 局 で は MZ-5500 を 使っ た 講座 放送 中 @ 北 海道 放送 @ 東 北 放送 @ 新 潟 放送 


BSED Dr. パ ソコ ン 宮 氷 好 道 mm 司会 : 下 条 ア トム / 坂 上 味 和 @ 長 野 放 送 @ 石 川 テ レビ @KBS 京 都 @ 広 島 テレ ビ @ テ レビ 西日本 @ 山 梨 放送 


パー ソナ ルコ ンピュータ 


票 準 価格 89,800 円 


TEG {зл {20 キケロ 421 "TOT TE 2: ЕЗ 
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レ マ ソ コン サン デー, スク ー リ ンク の お 知ら せ 


⑧ 講 習 場所 シャ ー プ 東京 支社 パソ コン 教室 CHINE パソ コン サン デー の 内 容 に 即 し た 予習 ・ 復 習 。 
en 時 128 1582128228 各 PM2:00 一 PM5:00 Ф л % シャ ー プ 東京 支社 パソ コン 教室 TEL 03(260) 1161 
өт в 各 20 名 (定員 に な り 次 第 締切 り ま す ) 依 受講 料 1000 円 ※ 講 習 時 に は パソ コン サン デー 第 6 期 テ キス ト を ご 持参 くだ さい 。 


| ПЕШ 


写真 の 14 型 カラ ー テ ディスプレイ MZ-1D15B 標準 価格 72,000 円 は オプ ショ ン で す 
v 3 画面 は ハメ コミ 合成 で 、 ハ ド ソ ン 制 作 の 「 マ リオ プラ ザー ズ ス ベ ペ シ ャ ル 」 よ り 


` FFE RK 
i MZ-1500 
Ро 1 係 


Mtr MIRAE? 本社 〒545 大 阪 市 阿倍 野 区 長池 町 22 番 22 号 തു (06) 621-1221 (KAER) @ お 問い 合わ せ は … 本 社内 国内 産 機 営業 本 部 まで 。, РОТ 。 


8? 


+ ДЕН マイ コン スカ イラ ブ : FM シリーズ の ハー ド か ら ソ フト まで 一 挙 に 展示 実演 、 あ な た の パソ コン の コン サル タン ト と し て ご 活用 くだ さい 。 
@ 東京 ・ 虎 ノ 門 (03)591-1091/591-2561 © RR- HÆF (03)251-1448 @ 札幌 < 時 計 台 ビル >(011)222-5476 く 丸井 今井 >(011)241-4185 @ 仙 台 (0222)66-8711 
р CREE e 名 古屋 < 第 2 アメ 横 ビ ピル > (052) 251-7231 @ 大 阪 (05)344-7628 //341-0486 広島 (082)247-3949 福岡 〈 開 設 準備 室 〉(092) 471-7203 


実力 に 人 気 が 味 方 し て 、 い ま 絶 好調 の 天才 パソ コン 


F M-77。 3.5 イ ンチ マイ クロ フロ ッ ピ ィ デ ィ ス ク ド ラ イブ 、 


な ん と 【2 基 内 蔵 】。JIS 第 1 水準 漢字 ROM、 な ん と [E 
準 実 装 】。 豊 か な ソフ ト 資 産 + 続 ぞ く 登 場 ജാന 
フト 、 な ん と 【 使 い ほ うだ い 】 。 こ の マシ ン と 仲よく な っ て 、 


神童 の 名 を ほし いま ま に す る 青 少 年 が ふえ て いる の は 、 


う 一 む 、 も は や 【 社 会 的 事実 】 だ 。 

3.5 イ ンチ マイ クロ フロ ッ ピ イデ ィ ス ク を 採用 。 0 

сатыл Уі? ロッ ピ イ ディ スク と ソフ トコ ン パ チ 
C. し か も 320KB(1 ド ライ ブ ) と 、 小 型 ・ 高 密度 化 を 
実現 し まし た 。 


標準 実装 の 漢字 ROM が 日 本 語 対 応 に 成 力 を 発揮 


JIS 第 1 水準 (2.965 種 ) 及び JIS 非 漢字 (453 種 ) が 
含ま あれ て いま す 。 


2 個 の CPU が フル 稼動 。 AE ! 
CPU の 役割 を 分 散 す る 、 汎 用 コン ピュ ー タ の 設計 思 
想 を 受け 継い び ア ー キ テク チャ を 採用 し まし た 。 
メイ ン メ モリ は 最大 256KB。 64KB を 標準 実装 。 


F-BASIC V3.0 が 多彩 な 機能 を サポ ー ト 。 de 
FM-77 の プロ グラ ム 言 語 は 、FM-7、FM-NEW7 と 
互換 性 の ある F-BASIC V3.0 を 採用 し て いま す 。 


グラ フィ ッ ク 機 能 。 —— 
FM-77 は 、640x200 ド 
ッ ト の 高 分 解 能 表 示 が 
妹 力 で す 。 カ ラー モー 
ド 時 は 、1]1 ド ッ ト ご &-8 色 
まで の 色 指 定 が で きる 
ほか '、 テキ スト と の 混在 
表示 、 ド ッ ト ご と の 人 色 交 
換 も OK。400 ラ イン カー 
ド * を 本 体 に 装着 すれ 
ば 640x400 ド ッ ト OK 
示 も 可能 に な り ま す 。 

* オプ ショ ン 


富士 通 株 式 会 社 : 
e 名 古屋 営業 所 (052) 201-8611 


ディ スク と ソフ ト で 差 を つけ る 天才 パソ コン 


FM- 77 


¥228,000 СҮЗІП 


ディ スク ドラ イフ 1 基 タ イプ \198.000 も あり ます . 


@ 大 阪 営業 所 (06) 344-1101 


スー パー イン ボー ズ * で オリ ジ ナ ル の 映像 づく り 。 — 
テレ ビ や VTR な どの 画像 と し. パソ コン の 文字 や グラ フィ 
ッ ク パ ター ン が ドッ キン グ 。VTR へ の 録画 も 可能 で す 。 
※ オ プシ ョ ン の スー パー イン ポー ズ ユ ニッ ト が 必要 で す 。 

サ プ シ ステ ム の 充実 で 、 画 像 処理 が さら に 高速 化 。 
FM-77 は 、V RAM の アク セス 方 式 に サイ クル スチ — 
ル を 導入 。 描 画 速度 が 最高 で な ん と 2 倍 (FM-7 比 ) に 
アッ プ し まし た 。 ま た 、 高 速 の 漢字 表示 が 、 日 本 語 ワー 
プロ や 漢字 端末 と し て の 利用 価値 を 高め ます 。 

音 に も 熱中 。8 オ クタ ー プ ・ 三 重 和 音 の サウ ンド 機能 。 
操作 性 抜群 の キー ボー ド 、 し か も セパ レー ト タ イ プ 。 


拡張 性 に 優れ た カー ド 群 。 1 
RS-232C、MIDI、 マ ウス 、 音 声 合 成 な と 。 
400 ラ イン セッ ト II ¥49,800 

①400/200 ラ イン カー ド ②64KB RAM カ ー ド 

③F-BASIC V3.5 

⑯ カ ラー16 色 中 2 色 、640 X400 ド ッ ト の グラ フィ ックス 
が 実現 。 

⑱ テ キス ト は 80 字 X25 行 の 16 色 カラ ー 表示 。 

@⑱ メ イン メモ リ は 128KB に 拡張 。 

広がる アプ リケーション に 対応 する ソフ トウ ェ ア 体 系 。 

ФЕ-ВАЅІС V3.5(400 ラ イン セッ ト に 含ま れ て いま す ) 

@0S-9 Level 1/Level 2* (ж 400 ラ イン セッ ト が 必 
要 で す ) 

ӨСР/М-808 (Z80 カ ー ド に 含ま れ て いま す ) 


ЖСР/М-808 は 、 デ ジタル リサ ー チ 社 の 登録 商標 で す 。 
(上 記 は FM-77 の 特長 で す 。 ) 


асе 


О 


'84 通 産 省 選定 
グッ ド デ ザ イン 商品 


すぐ れ た コス ト パ フ ォ ー マ ンス を 実現 し た 興奮 パソ コン . 
F'M-NEW プ 588o0 

(本 体 価格 ) 
ソフ ト は 定評 ある FM-7 と 完全 互換 、 し か も 数 か ず の 
卓越 し た 機能 を すべ て 継承 し まし た 


ളാ 5 イン チマ イク ロフ ロッ ピ イ ディ スク は 、 富士 通 純正 品 を ご 使用 くだ さい 。 お 問い 合わ せ は 一 一 富士 通 サプライ 株 式 会 社 容 (03) 434-0141 


e 九州 営業 所 (092) 411-6311 


信頼 と 創造 の 富士 通 


УЗМЕМ 

リツ ナル 
セン サー ロボ ポ ボ ) 
プレ ゼン ト 89 


Z A > 


© 期間 


"8411/15Ж-- 88 1/31% 


いま 、 富 士 通 の パソ コン FM シリ ー ズ を お 買い 
求め に な る と 、 抽 選 に より 、1 等 オリジナ ル く セン 
サー ロボ > を 500 名 様 に 、2 等 < ボ ポケット バン ド > 
を 3.000 名 様 に プレ ゼン ト し ます 。 

人 @ 応 募 要項 

FM シリ ー ズ (FM-NEW 7、FM-77、FM-11) 
の 本 体 に 添付 され て いる アン ケー ト は が き に 
必要 事項 を ご 記入 の うえ 、 ウラ う 面 下部 に 、(D 
「 オ リ ジ ナ ルレ セン サー ロボ 希望 ,② 本 体 製造 番 
号 (S/N) の 2 点 を 付記 し て 、1985 年 1 月 31 日 
まで に お 送り くだ さい 。 (当日 消印 有効 ) 

※ 当選 の 発表 は 、 賞品 の 発送 を も っ て か えさ 
せ て いた だ きま すさ 。 


e 半導体 第 一 販売 部 (03)502-0161 @ 札幌 営業 所 (011) 271-4311 東北 営業 所 (0222)64-2131 @ ERS ЗЕРТ (0762) 63-7621 © KS KP (0262) 26-8222 e 静 岡 営業 所 (0542)54-9131 
e 広島 営業 所 (082) 221-2288.  @ 高 松 営業 所 (0878)51-8167 


e 沖縄 営業 所 (0988)66-0655 


Attice Role a Paying Game 


8801 mkII 画面 


8118154857 U3 A. (X-1(4Eg 75 18) AZ DI mJ) sees: EDI 
ത 04171. —. മ]. RT ICT PATRI 勿論 画面 。 水 に 没 し 、 木 に か くれ 、 な め ТЕ: Бе дап II БЕН ZR ann 
大 一 括 ロ ー ド 、 TO EA nre യതി ded ate 当然 ら か に 動く キャ ラク ター は 、 拡大 ] 月 発売 РС 8801/ന1ധ -SF Di 6,800 
放さ ら に 加え て 、 華 豚 な グラ フィ ックス と 高度 な 重ね 合わ せ 処 理 に よる 立体 な マッ プ 上 を 駆け 巡り ます 新 発 売 X1/C TURBO テープ 版 4.800 


йа Ш FIJO 


[ത്‌ ന്തി RTF FED ET 25. 
SEETHER -Ylh ക്‌, IIA TYIAN ……… 
支 新開 発 の 高速 3-D ビ クチ ャ ー エ ディ ター 支 リ アル レタ イム シー ン は 、 リ ワイ ヤー フ レー ム に 


中 間 色 を 含む 1 枚 の 画面 を 、3 次 元 的 に よる 高速 リア レタ イム 3-D シ ュ ミ レー ター 
回 転 き せ た り 、 拡 大 ・ 縮 小さ きせ て 描き 、 さ る (残念 な が ら 、 ス トー リー の 展開 上 内 容 は 
ら に 、 描 いた 何 枚 か の 画面 を 自由 に 組み 公開 で きま せん 。) 
合わ せ て お 0 り ま す 支 ロ ー ル プレ イン グ ゲ ー ム の 要素 も 加え 、 
支 画面 を 切り 変え る た びに 居場所 が 変わ シー ン 1 (カセ ッ ト 1) だ け で も 60 以 上 の 地 
っ て いく キャ ラク ター 区 (画面 ) を 自由 に 移動 で きま す 
1 枚 の 画面 は 、 何 枚 か の 背景 の 画面 と キ 注 PC-600ImkII/6601 版 は 、3-D ビ ピクチャー 
ャ ラク ター の 画面 と の 組み 合わ せ に な っ エディ ター は 使用 じ し て いま せん が 、 新 開発 
て いて 、 ゲ ー ム 進行 の 条件 に 合わ せ て 、 の 高速 グラ フィ ッ ク エ ディ ター に より 、 一 
を の つど 、 背 景 と キャ ラク ター の 組み 合わ 画面 表示 は 暗黒 星雲 の 倍 の スピ ー ド に 
せ を 変え て 描き ます な っ て いま す ,。 3-D シ ミュ レー ター は 疑似 
文 画面 数 、 コ マン ド 会 話 数 も 大 幅 アッ プ 3-D と な っ て お り ま す 


廊 登 場 人 物 、 お 馴 み の キャ ラク ター は も ち 
ろ ん 、 全 20 キ ャ ラク ター 以上 が 登場 


PC-6001mk 11/6601 

ョ テー プ 版 4800 円 *35FD 版 6 800 由 SR: 
テー ブ 版 \4.800 

FM-/NEW-7/77 ;rpik.35FDRX6800F 


ШШ 


ワン アルダ イム コン バト ラン ショ ング ゲー ム 


バラ ノイ ア 688 


も う 画 面 数 な ん て 関係 な い 。 

ゲー ム を し な が ら 、 コ ンス トラ クシ ョ ン / 
൫ 紀 を 使っ て 迷路 を 変更 し 、 エ イリ アン を 封じ 込め 、 ピ ラミ ッ ド の 秘宝 を 探せ 。 
൫ も ちろ ん 初期 画面 作成 エディ ター も 付い て いて 、 簡 単に 変更 で きま す 。 


PC-8801/mkII…… テー フ 版 \4.000 5FD 版 ¥6,800 


3-D コ ルフ シミ ュ レ ーション に ら に 
| J[35FDM 絶賛 発売 中 6,800 
FM-77 3.5FD 版 絶賛 発売 中 ¥6,800 
"ODD 発売 中 248,800 
PC-6001mkI1/6601 ІН 


m テ ー ブ プ 版 \4000m3.5FD 版 \6800 2 د‎ 
| | 日 立 S1 テー プ 版 ЖТ OW 4 му РЕК А є 4.000 
| A Ж MZ-1500QD 版 は みす な є 4 000 


ゲー ム フ リ ー ク と ゲー ム デ ザイ ナー の 接 発行 中 / 


TE マガ シン 


NMM . 製造 ・ 販 売 / 株 式 会 社 テ ィ ー ア ンド イー ソフ ト 7%(052)773-7770 


К са 
$Ë 072400174 FAF カタ ログ NN3 が で きま し た 。 
Hx» 。!「&ESOFT 事 務 所 の 住所 が 次 の よう に 変更 に な り まし た 。 尚 、 電 話 番号 は 従来 通り で す ТЕ ーー デー ンク 7 
Piol BS F465 名 古屋 市 名 東 区 豊 が 丘 1810 番 地 


2222 : き 通信 販売 ご 希望 の 方 は 現金 書 佑 で 料金 と 商品 名 機種 名 を 明記 の 上 当社 宛 お 送り 下さ い 。 (送料 サー ビス ・ 速 達 希望 の 方 は 300 円 プラ ス ) 
請求 券 : 支 T&E マガ ジン No.4 ご 項 望 の 方 は 、100 円 切手 2 枚 (200 円 分 ) を 同封 の 上 マガ ジン 請求 券 を お 送り 下さ い 。 
Pio! AE : 赤 T&ESOFT の 新しい カタ ログ (No.3) が で きま し た 。 ご 希望 の 方 は 100 円 切手 同封 の 上 、 カ タロ グ 請 来 券 を お 送り 下さ い 。 


デザ イン 一 新 ./( ニ ッ 折 6 ペ ー ジ ) 


ӘРЕ . . EID e W. 


9 X1 シ リー ズ Баг рте GOS n NC wa 

М MZ-80B アス テロ イ ド ・ ク ラブ m w-— 橋本 知弘 48 
MZ-1200-80K/C TAT ° 7 アイ ター ee Y.E.C.LOAD RUNner 51 
FP-1100 Hard Ship Ж.................-Ж А 小谷 部 和徳 58 


Ppc-8800 シ リー ズ DIA Z V» A z^ N88.……Syntax Error 17 | FM7/8 スー パー ベー ス ・ ボ ー ル … あ ん ち ・ じ ゃ いあ ん つ 22 
PC-8000 シ リー ズ m) š FA LGR — JW: 高田 雅弘 28 FM-7 人 プラッ ク ・ ジャ ッ ク … ドー 新堂 功太 郎 23 
人 ⑳ ア ステ ロイ ド ・ フ ァ イ タ ー……| 移植 屋 K 29 人 ⑯⑳ 市 ベー ダー RRS ROSE Nr tege LEER ATT MA ね この と む 28 

Marine Warm DARTH VADER 67 BOMB ВОМЕ--------------- 丹羽 英智 100 

+e 7 ライ b 9 MO АЕ 小柴 健司 73 പര Super Mephist 107 

PC-6000 シ リー ズ 人 スパー タ a A ЕЕЕ 24 LEVEL MARKS RN — R R] R аваат 
OED BETTS EER с hb ОҢ. すき まっ 風 26 T4 全 ボ ー ル ・ イ ン ANS NI eem The AT3R 20 

@ š こく こと ガー レー ズー ター 田辺 治 27 JR-100 ラン ド ・ マ イン ee 古山 啓一 郎 25 

The Tube ee 豊 沢 保 樹 75 JR-200 PiO PiOn SA 迎 夢 超人 126 

て いく マン ee 渡辺 洋 84 Mm буулуу 2000 "HET 

O: ラク ル ・ ワ ー ル Е K+ oH- 90 VIC-1001 Potato Panic ^ 稲葉 有 記 131 

PC-8001mkIl ©з スモ ・ ト ラベ ル 1999 ……… BARS S | рео ТВЕА есас САСА АТ 
スネ ー ク < ワー ル Ems 石上 達也 61 | PC-1500/1501 Up & Down 8 真鍋 正幸 150 

MZ-1200・80 К/С @О-+ セイ バク Ju eem 瓜生 哲也 18 PC-1251 EEE FE 豊田 雅 嗣 154 
(2М2-100т ы аны И さん じゅ うい ち 19 ザ ・ ハ ー ベ ス ト ・ タ イム SC Ae Die 真田 佳 門 156 

MZ-1500 0771 ЕХ Ж... Ир PSCHO 20 PC-1350 ブロ ッ 72€ ў L HIR 名 口 孝志 158 
ORGB アタ ッ カ ー ത്ത്‌ が ん だ も む 22 PC-1245 Dangerous Zone е 近 成 人 160 

X1 т TURBO 7..-.................-.............: 9, ЖЕ 116 BIAland Mines 高井 円 162 
М2 -2200/2000 ロー ドラ イン ee ぱっ くま ん 120 PC-1261 В Кеу House 2--------- 物理 部 同好 会 会 長 163 


MZ-80B BIChampion Golf es ピー スマ ジン 123 PB-100/300 


қ; x ミラ クル ・ ワ ー ル ド 
n // Jan R. | ДЕТИ ИИ Е РАР А N88 
v ё し | BOMB BOMB 

DJ hy Nara x seta: ルナ ー ジ ティ 5 〇 ら 


87%... — ト fe m DAN жетек М, ത്ത... 7-5- 編集 部 36 
PV-7 @ 超 低 価 格 MSX パ ソコ ン …ーーー ド ーー 173 


РС -600 im k П S R/PC-660 IS R TU mue 00 174 


ロボ バル ORRA VIY DRY а vt 
737499 a Aa WA 139 バタ ー ン ・ エ デイ タ 88 кж тш 


FEF ZA ダン ス (FM-7 編 ) ER 


Begin Тһе BASIC “DAN” 2X XM 5] 
PiO 情報 局 തത്തന്ന ത്‌ 32 റി; 171 РІО acd ———— 60. 149, 162 
PiO イ ン デ ックス 33 マイ コン 人 生 ・ 相 談 ………… 180 PIO パー ツ …125.146、157、165、169 


PiOlQ- MH 38 チェ ッ ク ・ ・ サ ム ・ ・ プ ログ ラム ・ eee s ч 182 к dos Д.Н 47 
ソノ シー ト の 使い 方 zT 44522 64 PiO プ レ ゼ ント ・ コー ナー…… ド ーー 183 昆虫 採集 നാറ്‌ 57, 161,183 
൧൨൭72൦... 138 PiO バ ザー ル ЯНАР е 184 原稿 募集 ക്‌ MEM 153 
PiO 伝 言 板 ФАКТ ത്ത്‌; 170 COMPAC BEST10…… ド トー 167 


イラ スト : は ら JIN/ 北 野 玲 / タ ッ ド Kon Qi— Sonosheet В = BASIC only @ = miniPiO 


札幌 か ら 世界 ヘーーーー ーー 


dB-SOFT 
4 ファ ン へ 更に 100 面 プ ക്ലാ 


24 


oO, DOO F REMES 
MSX ica 


10081271... 7.71: 
Faved ЛБЕ EY! 


e テー プ 版 ……4.500 円 5477 
FD 版 /3 イ ンチ FD 版 …… 8,800F3 


@ 8 イン チ FD 版 8.80073 e 5477 
FD 版 ・2W・2DD……… 8,800) 


全部 の 面 を クリ ア し た ら 、 
認定 証 あ げ る . グ 最後 の キー ワー ド 
(MSX テ ー プ 版 は 画面 の 絵 ) を は 


が き に 書い て 、 dB- 
jat SOFT に 送っ て ね 。 名 
前 は ふり が な を お 忘れ 


ご 注文 は 罰 現 金 書 留 : 当社 PIO 係 まで 。 田 銀行 振込 :「 た くぎ ん 札幌 駅 前 支店 普通 
053-0531 OFTA ӨНЕ MIAO SERVE Өс ғ 電電 話 番号 を 書い た 
メモ を 同封 し て 下さ い 。( 銀 行 振込 の 場合 は 、 ハ ガキ に 記入 の うえ あら か じ め ご 連絡 下さ い 。) 


5 イン チ FD 版 ………… 6.800 由 
4,8003 @35 イ ンチ FD 版 (FM-77) …… 6,8003 ぉ 35 イ ンチ FD 版 ……… 6.800 円 


BMSX-7— БАГЛЫ SEDER 


通販 の FRN 


(送料 無料 サー ビス ) 


TOTAL SOFTWARE HOUSE 
デー ビー の アイ ドル キャ ラフ ター 


『 ク パャ ッ く ん し 」 


ファ ン に 人 待望 の ゲー ム が 促 間 入り lI 


ы... ANNE ERES \ 
し いよ し \ よ 戦い は 始ま っ た ENTI 
ニッ ク で 遂に J 機 合体 / 


ж“. | 


| w к SSO i a 86.800F3 
Š T #7 5 イン チ FD 版 ……… ド ーー FM-7 用 ・X1 用 ・PC-8801 用 
3.5 イ ンチ FD 版 налары» еу FM-77 用 "3 イン チ FD 版 و‎ X1 用 


※ ハ ー ド に より 、 画 面 構成 、 ゲ ー ム 仕様 が 異な り ま すむ 


迷路 は 危険 ソー ング 本 格 派 は 本 物 を 選ぶ 
B コ リバ イコ 


生 dB-IBASIC で プロ グラ ミン グ 、dB コ ン パ イラ で マシ ン 語 
に 。 mWdB-IBASIC の フリ ー エ リア は 、 41K バ イト 。 (PC- 
8801| 用 < テー プ 版 > 38K バ イト 。 PC-8801 用 <FD 版 > 34K 
い を 起こ す 1! ? | バイ ト ) 。 生 MZ-2200 用 ・PC-880! 用 < テー プ 版 ・FD 版 > 
君 は 目 ま い を 起 2 ^ ( に は 疑似 PCG 機 能 搭載 。 wm コン パイ ル す る と 10 数 倍 
新 発 売 // S1 用 < テー プ 版 > = | の 高速 ゲー ム / 

оъ 1 W 00990183 ൦൧/൬............ 9,8005 


| e X1( タ ー ボ ) 用 ・MZ-2200 用 PC-8801 用 


超 高 速 / 超 3-D/ あま り の スゴ さ に 


画 X1 用 < テー プ 版 >………… gc 


stare tar MIdBBASIC 


画 MSX 用 < テー プ 版 >……3.800 円 。 X1 用 ・MZ-2200 用 < テー プ 版 >…… 各 5,000 円 


テー ビー イン フォ メー ショ ン セ ンタ ー 開 設 


デー ത്ത" ri 
デー ビー ソフ ト ご 愛用 の 皆様 へ の 専用 窓口 と し て イン フォ メー ショ ン セ ンタ ー を 新設 発売 元 E ر ر‎ КЖ 会 社 


お 問い 合わ せ ° 通信 販売 の 新しい 相談 窓口 と し て ご 利用 下さ い 。 


"-————————————— ES а Т > 27 —/( Т 060) rh rRNA РЕТТЕ fA 71 ൧.50 1(251)7462 


NWISCURE 000//890 
` 


«e ^ #788 ШЕ HOVER 


X1 シ リー ズ 

ホバー 戦士 と 戦闘 艦 の 2 つの 兵器 を 戦況 に 
応じ 合体 ・ 離 脱 さ せ 敵 メイ ン ・ ベ ー ス を 攻 
略 / ジョ イス ティ ッ ク ( 行 動 系 ) と テン ・ キ ー 
(攻撃 系 ) に よる 操作 感 か ら 強 裂 な 戦闘 シー 
ン が 展開 . 実に り リアル だ .,/ カセ ッ ト 3.800 円 


SCRE 000088 10 


PC-6001・32K/mkII/6601 

2 人 用 ゲー ム / 作戦 を 立て 進軍 、 敵 対す る 
バイ オ ・ ロ ボ 軍 団 同士 が 相手 の 指令 部 占領 
めざし 激突 する ロボ ッ ト ・ バ トル ・ シ ミュ レー シン 
ョ ン . 移動 力 , 機動 力 な どの 異な る 5 台 の ロボ 
で 2 シー ン を 戦え Z ( 要 JS) 24ғуһ3,500Ғ3 


nr 


——AJX* 
ഗ്രോ Ed 
EN 4 


cien 


ーー テー 
ーー 


Sa "me 


പ. 
( 


i が 


| 


R.SISCN 
ENERGY 


SHIELD 


X1 シ リー ズ 

エネ ルギー・ チ ャ ー ジ で 戦闘 能力 の 異な る 
戦闘 形態 か ら 強 化 型 機甲 戦士 形態 に 変形 / 
最新 鋭 変形 兵器 AS-TURBO が 繰り 広げ る 


8 方 向 ス クロ ー ル 宇宙 戦 . 第 6 戦域 に 出現 す 
る 瑞 巨 大 要 寒 を 破壊 せよ / カセ ッ ト 3.800 円 


FM-7 シ リー ズ 

最新 の テク ノロ ジー を 結集 し た 鳥 脚 歩行 型 
兵器 バト ル ・ ボ ポッ ド . ミサ イル , 近 距 離 用 爆弾, 
高射 ビー ム の 火器 を 装着 し , ジャ ンプ か ら 前 
後 ロ ケッ ト 噴 射 で の コン トロ ー ル は 快感 も の / 


カセ ッ ト 3.800 円 5 2D デ ィ ス ク 5.800 円 
「 ポップ: バルーン 」e X1 シ リー ズ CB.800 円 「 麻雀 四天王 ,e FM-7 シ リー ズ CB.,800 円 D5.800 円 「 ム フ と 宝島 。 e FM-7/NEW7ID5.800 円 走れ / スカ イラ イン 」e PC-8801/mk 11 /8001/mk II 
ビッ L3/S1IC4.800 円 e PC-9801/E/F.05,800F3 e PC-8801/mkIIID5.800 円 e MZ-1500Q 05.800 円  X1/MZ-2200C4.800 円 D5.800 円 FM-77 3.50|5,800-3ө e FM-7/NEWZIC4.800 円 D5 , 800F3 


「F-15 イ ー ブ ル 」e FM-7 シ リー ズ C8.500 円 (G は カセ ッ ト IDI は 5" 2D デ ィ ス フ |3.5D] は 3,5'2D デ ィ ス グフ 6 D は フイ ッ フ ・ デ ィ ス ク ) 


[Cl3,800 円 " ザ ・ コ ッ ク 


_ — 
мо 05 A (ХУ 


ae GEL a: Wm 
Ед 
Ai 9% v 


о 


> 


d A 4 
も i * Ar I = \ \ 

A x ES ; ` 
RATE 


1091? 


EM 
ー 
m 


DD Bag 


400൮0 


аалдалязая 


TEN ТЕЙ 5 


PC-88/IL,PC-98|E]F, FM-77-A,S1 РС-8801/тКП,РС-6001тКП / 6601, X1/C/D, PC-8801/mkII PC-8801 /mk II 

我ら が テン テン も FM で 生ま れ PC-8801/9801 X1/C/D,PASOPIAT 強 さ と スピ ー ド が 誇り / 元祖 「 将 棋 対 局 」 に ムク: シリ ー ズ の 第 2 話 「 ム ク の 郵便 屋 さ ん 」. 

S1 と 次 々 に 移植 . 脇役 達 の 大 活躍 で 近い 全 4 機 種 8 タイ プ に ライ ン ナ ッ プ / 人 気 の 実戦 磨き を か け , さら に 強く スピ ー デ ィ に バー ジョ 宝島 か ら 戻 っ た ムク は アル バイ ト と し て ハハ ガ 

は ず の ゴー ル が どん な に 遠く 思え た か 「100 4 人 麻雀 「 珍 さん 麻雀 」.X1 版 は ジョ イス ティ ッ ン ・ ア ッ プ . 相手 の 読み 表示 」 機能 が 初心 キ 配 り を する は め に な っ た -. 100 面 の 迷路 に あ 

面 制覇 の 道 は 険しく , され ど ウ ッ ト イ は 楽し /」 ク だ け の イー ジー プレ イ 方 式 . ま すま す 華 や か カ ソ 者 に 人 気 / る ポス ト に 怪物 達 の 邪魔 を か わし 頑張 る . パ 
ズル 的 面白 さ に 挑戦 / 


この マー ク の 付い た ゲー ム は コン スト ラク ショ ン ・ メー ル ・ オ オー ダー サー ビス 


セッ ト 付 , あな た の セン ス で 自由 な 面 作 り , アレ > 
が 楽し め ま ま 。 — | ^ | 通信 販売 の 場合 は 送料 1 本 500 円 2 本 目 以上 は 
1 本 に つき 100 円 増し ( 例 2 本 な ら 600 円 ) 


ジ が 楽し め ま す 。 


発売 元 株 式 会 社 コ ム パ ッ ク 7%(03)375-3401 
〒|5| 東京 都 渋谷 区 代々 木 |-37-| ぜん らく ビル 5F 


КОЕ! プロ グラ マー 担当 志村 
€ (在宅 アル バイ ト 可 ) 


AXIOM 


アク シオ ム 


婦 思 の 地 プ リー ブック グ を 突如 と し て 襲 つ だ 数 々 の 異変 それ は 闇 の 司 察 ア ル ガ ル 
ド の 黒 魔術 に よる も の で あつ た だ 。 愛す る プ グリー ノッ ク に 平和 を 取り 戻す べく 神託 を 
受け だ 長老 に トマ の 求め に 亡 じ で 集まっ だ 20 名 の 勇 直下 5 

洗練 され だ ゲー ム ・ シ ステ ム と と スピーディー な スズ ドー IE OSD 7 
レイ ング 界 に 波紋 を 投げ か ける 、 実 力 派 RPG「AX10M』。 書 も 、 う が か が う ガ が し て い 
られ な い / PC8801 用 Т 4,800 円 , D 7,800 円 


オラ ンダ 要 は 電気 ワナ ギ の 夢 を 見 る が コリ ドール 


時 は 199 X 年 。 東 京 で は 孤独 な 独身 男 «deme viv e |. 北 の 国 サ ウロ ス で は 国王 リ ゴ ー ラ ス 
窟 氷 の 死 を 遂げ る 事件 が 多発 し て い ന്‌ 
പിച്‌; പ്രി 息子 は 皆 優 x 
別 捜 資 引 を し き 解 明 に こ あ だ っ だ が 、 F Tis 
TONES 5157) 0/5, Th 
ODS 474775 C 05 d»: Is IC 
ASRS Л ENE. "3 
DAFT TURES, 
を 3 体 集 め て 欲し い 。 
あな だ は 意 人 サチ コ と の 結婚 を 控え 、 
お 金 も 必要 で あつ だ だ め 、 や お む お な ご 
その 依頼 を 引き 受け だ 。 登 日 、 東 款 
КЕТУ (8975 
DED 57. 

PC-8801(mkID БЕО 7,800 ы 
T 4,.800 円 PC-9801 シ リー ズ 8.,800 円 
(成人 向け ) 


ഷം 呪い に よっ で PITE 
伝説 の 城 を 求め 、 あ な だ は 旅 立 
PC -8801(mKID, 8001 സ്പണ, FM7/ 
77 БЕС 6,800, T 4,5003 


о 


ひよ つ c L 44; ご の ゲー ム は ノル マ に 追わ れる 


技 々 現代 の 作者 の 強烈 な 文明 批判 で は な い 

TEGO де; LU ED 7274 )»8 4 

а ワイ デイ ア で 充分 楽し め る 填 出 来 の ソフ ト T 
ЫР, ЖТ p 


T 4,8003 PC 8801/ткП, FM7, X1(C) 

D8' 7,8003 PC 9801 

D5' 6,800 PC -8801/mkII, PC -9801/F, 
FM7-8:11CAD) 、X — 4|D3.5' 6,8009 FM77 
D3' 6,8000 X1D 


も つ 目 が 皿 走 つちや ゃ いそ つう / 信長 に つ この ソノ フト は スゴ イ 。 ち や ゃ ん と 守備 で 今 、 ア メリ カ で 最も 人 気 ガ びあ り 、 277 
SST _ 晩 徹夜 し て し まつ だ と 言っ つ は 前 進 、 定 位置 の 切り 換え が で きる し 、 の 主流 で ある ロー ルプ レイ ング ゲー i ; 
だ ら 読 売 は 笑う だ ろう ガ 。 じ が これ バン トシ フト も と れる 、 ご これ は 秘密 だ വം (ゲー 進行 も 比較 的 シン プ テレ ビ 、 新 聞 、 雑 誌 に と これ 程 話題 に 上 つ だ ソ 


AES "ボブ プ コ ム 」 より Ef мй at E! М DM ント レ スト ー リ ー も 日 本 人 に 2 CE ンド ほこ ガラ て な が つた だ кайыр: а > 
Т4,500-4 PC-8001/mkII, PC -8801/ | 一 ス を や ら ざ ず し て 野球 ゲー ム は 語れ な - А орда аы TT AAS "ДА ダル ト の 世界 、 御 結婚 の お 祝い こも ぜひ どう そ 
mkII, РС 6001mkII, FM7:8, XC) — い / x i ノ ポ リス 」 より T4.500 円 門 に 最適 ) ログ イン より 。 T4.500 円 , PC 6001൩൩, PC жігі РС 8001 
08 7,8004 РС 9801 05 6,8004 PC 6001mkIl, PC 8001/mkll, PC 「5.200 円 (プレ イヤ ー ズ テー ブ プ 付 ) ൩൨, PC 8801/mkII, FM7-8, X1(C). MZ 220 
PC 8001/mkII, PC 8801/ткП,РС 8801mKII, FM7, X1(C) D5' 6,800 PC 8001/ткП, РС 8801/mkII, FM7 D8' 8.800 円 PC 9801 
9201/ Ғ. FM7・8・11(AD) X – 1.03.5 FB PC 6001൩, PC 8001/ткП, PC 05" 7.800 円 PC 8801/ткП, FM7 D5’ 7.800 円 PC 6001mkII, PC 8001, PC 
6,800 円 FM77, РС 6601 03 6,800 8801/mkII,PC9801F, PC 9801, FM 03.5 7.800 円 FM77 9001mKH РС 8801/mkI PC 9801, РС 9801 
円 X1D 711CAD) X — 1.03.5 6,800) PC Е,ЕМ?:8-11(А0). X—1 

6601: FM77 02 6.800 円 X1D “03.57 7.800 円 PC 6601, ൦൧77 D3 X1D 


⑤ 通 販 を ご 希望 の 方 は 現金 書留 に て お 申し 込み 下さ い 。( 送 料 サ ー mm 


ізсе 


SSR 


ы 


മത്ത്‌ യായ 


га 
2 


ы NE HU 


— eee NR た SN た 
| Sepe 


あな だ の 選考 と 指先 は トイ レツ ト ・ ベ ー バ ー に 何 を 見 る か 
これ も 一 種 の ロー ルプ レイ (RP) DE? 


思考 型 迷 路 ゲ ー ム 数 ある 中 で 、 ト イレ ツ ト ベ ー パ ー を ころ が し て 道 を 作る 、 
な ど と いう バカ げ だ ソフ ト が あつ だ だ ろう か "随所 に ちり ば め ら れ だ バズ 
ル 的 な 仕掛 け を 突破 レ し 、 お 邪魔 軍団 の ウ 〇 チ く ん 逢 の 妨害 を 避け つつ 彼女 
の 家 ま で ひだ 走り 。 あ な だ の 武器 は 、 ベ ー バ パー と 明 せ き な 頭 脚 だ け 。 
思考 型 ア フシ ョ ン ゲ ー ム の 決定 版 ダ PC8801(mkII) 用 
(068008 71380089) 


ほとん ど ビ ョ ヨー キ 、 で は な ぐ 本 当 に 病気 の ソフ ト で す 。 AW eiiam SN fia t die We 
注 …… こ の ソフ ト を 見 た 人 は 、 お 医者 さん に な ら な いで 下さ い 。 OW 


ウ ワ ー ン つい に 出 だ よ お 一 一 、 ボ ク 等 は こん な ソフ ト を 持つ て いた だ ん i T i F Т” *^ us 

mI o EE ULLAM, ЧӨ X 3 ര RY sque 
全国 6000 万 人 の お 医者 さ ぃ ご つこ ファ ン の 雪 さ ん を 狂喜 させ る ロリ コン ゲ M аны SPESE MA dese 
ー ム 『 マ イ ・ ロ リー タ 」。 あ な だ の 微妙 な 指 使い が 、 少 女 だ ち を 病魔 か ら ен" Ф. 


救う 。「 先 生 、 お な か が いた だ ー い 。 「 よ し よし 、 じ ゃ お 、 カ 〇 チョウ し よ 
つね 。 J ああ 、 RIES LÆRK. 
FM7:NEW7 ・// 用 (CD5800 円 、 T 3800 円 


リス 愛 の 旅 立 


iles Ке: ORE 
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T 3800H3 T 6001 


T 3800H3 


THU BEARS CEED の корса dac ооа うと いう ©; 誰 で も お い (/< RZ Aes ള്ള 60 

28277 2 7 E DEN 7 604 召し い 使 命 を 背負い 、 今 日 も いばら て 知 つ て る や 、 そ う 、 そ れ は 鳴 の 、 こい 」 待望 の 新 発 売 。 そ れ ! 四 光 だ 、 

上 の バリ エー ショ ン が 、 無 敵 の 3ー の 人 道 を 歩む クリス 。 感 動 の 精神 世界 プ "フン キン ・ カ レー HIE, BEE! - 札 が 飛び か 

DÉai1—49-—' YT OITA ERI ー/、r ク リス 愛 の 旅立ち テー- フ リス 4 万 向 の 超 高 速 ス フロー ル ・ ゲ ー ム Чай дей 、 今 動き 始め た ! 
айлы. T, Весоок UP し よう 1! 


& 17 25 
MRR TCR +223 横浜 市 港北 区 日 吉本 町 1876 光栄 ビル IF 77044 61 686140 


ര ക്ക നി 


ടിക്‌ 
ss 


"TH ട്‌ 
ラフ パソ コン 本 体 と ディ スプ レイ 、 フ プリンタ に 限り 表示 価格 より 更に 5 
害 有 引き いた し ます 。 

THO. パソ コン 教室 の 受講 料 無 料 


但し 、 パ ソコ ン 本 体 を な 買い 上 げ の 方 に 限り ます 。 


特典 は. パソ コン ソフ ト 特 別 割引 き 


ан - и, プリ ンタ に кечо. O た шір s ee 


PEP ge RE EEE TERT 


a 標準 価格 Mae zm 
"Ve T fedi 8920... “8, 00013 -278, 
പം ത്ത 23,200, дый 


SEE VEM 


SEAT FS BAT 
Lp E E ഗ്‌ 
5 イン チ 両 面 倍 密 の フロ ッ ピ ー を 2 基 内 蔵 。600 %400 ド ッ ト 
デル カラ ー デ 表示 "デジ ダル テロ ッ パ 、 スー パー イン ポー ズ も 


എ ച്ച トー タル 的 に パ バージョン 
ッ プ 。 


22 ` Ex .000 EAG DEBE «24i | A 5 
Жама А. ‚ЖЕЙН RR #:42.75% - : 


PG600ImkI?R 


BNEG:PG-800!ImkiSR 
さま ざま な ニ ー ズ に 応え る イブ パソ コン 、 ROCHE 
登場 


標準 価格 単品 価格 BN JE 標準 価格 単品 価格 
— NEC:Mr.PC*PC660ISR:----.................. 155,000Ғ3:155,000Ң жам  NEC:PC6001MK II $ :::::::-й DESIT 89,800 円 ・89,800 円 
` NEC:15 型 カラ ター ディス プレ イ テ レ ビ ・PCTVI5|… 94,800 円 ・ 94,800 円 — 1 27) JI リコ ロト С NEC:14 型 カラ ー デ ィ ス プレ イ ・PCK-D252 ……67 , 800 円 ・67,800 円 
` NEC: プ リン タ ・PCPR40| നനന 39, 8008 : 39 , 8008 4 — سا‎ гі < レン の ーー ` NEC: ディ スプ レイ 置台 ・ PO60M75・………・ PM „5.5009 5,500 円 
_NEC: プ リン タケ ー ブ プル ・PC6094 …………… 7,500 円 ・ 7,500 円 1൬൫) ザラ ヨー デー タレ コー タダ ま ・MR33DR……… 12,800 円 ・10,300 円 
BS TT ае TEA 標準 価格 合計 175,900 円 
കകാ ത്തി ി IT om 10900081272 77 S67 P2 B 178 000 3 
34220000 ӨЯПЕРЛЕ ര. | PRR О aa10,000= 7000: ДЕН 
支払 期間 24 ヵ 月 ・ 支 払 回 数 24 回 ・ 実 質 年 率 4.50% A M - 支払 期間 24 ヵ 月 ・ 表 払 回 数 24 回 ・ 実質 年 率 8. 00% 


66 2H j nip” 
人 気 の MSX パ ソコ ン ・8 ビ ッ ト パ ソコ 名 作 ・ 新 作 を 中 心 と し た ソフ ト が 常 RT TN 
ン を 中 心 と し て 各社 パソ コン を 大 量 時 10,000 巻 。 し か も 、 専 門 の ソフ ト ・ 無料 配送 Я 
展示 。 も ちろ ん 、 フ ロッ ピー ディ ス アド バイ ザー の 常駐 に より 体勢 は 万 KA 77 
297) PE ളു. HU ^ 全 。 欲 し い ソ フト が すぐ に 探せ ます 。 йкы Алт Sek 
誌 や 専門 書 な ども 豊富 に そろ えて い また 、 パ ソコ ン 教 室 で は 新 製品 発表 ce evr 
പ്ല: まで 頁 作 を も っ て 行い ます 。 жий 
че と ` ッシュ の 実演 š G P. y > : э | % А 
കിം 
x á А ~ ച്ചി 発送 を いた し ます 。 お 気軽 に ご 利用 
くだ さい 。 
店 題 の 16 ビ ッ ト マ シン "IBM:JX" な "お 支払 いら こく らく 
ど 、 各社 ビジ ネス 向き パソ コン を 大 _ クレ ジッ ト 


量 展示 。 も ちろ ん 周辺 機器 も タッ プ 
IJ 展示 。 見 て 、 聴 いて 、 触 っ て … 納 
得 の いく まで 商品 選び が で ME 
23. TT NTS を 常設 。 Zi 
ー プ ブロ 専任 の イン スト ラク ター が 常 
駐 し て いま す の で 目的 に 合わ せ た 使 い 
や すい ワー プロ を お 選び いた だ け ま す 。 


現金 一 括 払い だ け で は な く 、 各 種 ク 
レジ ッ ト カ ー ド も ご 利用 いた だ ける 
也 、 ご 子 算 に 応じ て 月 々 の お 支払 い 
が 楽 な 3 回 一 24 回 払い の 分 割 払い や 、 
冬 の ボー ナス 一 括 払 い 、 冬 と 夏 の ボ 
ー ナ ス 2 回 払い も ご 利用 いた だ け ま す 。 


P eit 


УР ый 


ーー 
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— a! «d ad dari a алыл ананы 


Es 


ഥം. 


A oe £ { 
D MM RARE ||  ENISEIMZ/bs 


"M82730... 57, 80009-48, 60083) / BER വിം 
NN ІЗ v > 2 А の ) 3 Š 2 
5 cn 1,800 ЖЫ im i 4 = 性 能 マ シン 。 標準 価格 単品 価格 


Жа ua % Ж--Ій:ҒМ77:М825250-5-------.---228,000Ғ3-228,000Ғ3 
HD) ықы ട്ട 富士 通 : カ ラー ディ スプ レイ ・MB27343 -- 67, 800 円 ・ 48,600Ғ3 


асна: 068; 2277 SH 60100053) — : еб аскын созин 


現金 セッ ト 特 価 258100072 121227 H8 8270 000: 
:8 30, 000ғ3 


支払 期間 24 ヵ 月 ・ 支 払 回 数 24 回 < 実質 年 率 00% 


ë здік 
bari rào ыр miei ыйан қалы азады EY 


എ ളി 8 p S — че C 
NU Rr SR RA AR кары; gc Ae ag „ で "まで ഹ ғаз 
WAN れい いい いい ペペ で ーー l Ex v> 
Ap ae a ыз SS ജ്ജ? I 


NN 

യത്ത്‌: MZ) S00 
走り の 違う クイ ツク a Sep H 
トラ - 737 &t 


mz | 


cad dto td hl эф e Eum 


та 価格 ലിക 


CENT d ІБІ, 008 
84:7 $0127) 8600 円: クビ ント 特価 135W000 円 


頭金 d.000 円 


支払 期間 4 ヵ月 ・ 支 払 回 数 14 回 ・ 実 質 年 率 9.75% 


BNEG:PGB8B8OQ0!IMK^oe*model 30 
一 2 台 内 蔵 。 い い ソ フト と 周辺 機器 で 広 が 
レラ ウン ド プ レイ 。 標準 価格 単品 価格 
80!МКП model 30: 275,000 円 ・275,000 円 
カラ ー デ ィ ス プレ イ ・NH! 4DN…・ 99 800 円 ・ 89,800 円 


MRR SR, 800 円 - — — H— — 
" IBM:: FLAYN: 


BIEN, J IBM: 48 


ラー ディ スプ | 


IBM:10 イ > A 転写 プリ ンタ ・55 | 
遂に 出 た ./ あの IBM か ら 、 IBM: ブ プリ ンタ ケー ブル -6344165---- 8,000F3 
720KB の ディ スケ ッ ト を 2 台 標準 価格 合計 642,000 円 
搭載 し た クラ ス 初 の 16 ビ ッ ト vix: yv 
マシ ン の 登場 で す . 現金 セッ ト 価格 642 和 00 円 少 レ ン ツ ト セ ヤッ ト 特価 670 各 00 円 


頭金 46.000 円 


上 買っ て か ら も コパ ソコ ン の こと な ら 5CsQ に お まかせ 下さ い 、。 


203(253)4191 203(461)3121 203(346)2381 ee mio i 
fa 


年 率 4.50% 


千代 田 区 神田 佐久 間 町 |-!5 


orci mm 
тәсесото 
Чцашуыич2, 


203(253)7948 


ЕЕ зу? gi " 
C&G あ きら は はら Fe ю $m LM 1-15-16 
ഴ്‌) 1 フン オブ = 


人 な 03(258)4101《⑯ | 
ur 千代 田 区 外 神 田 |-15-| いい いも の を 、 いい サー ビス で 


5b— 30e 


CQ は 第 一 家電 の パレ コン ショ ッ プ で す 。 


< 神奈 川 県 > 本 八幡 店 0473(77)8001 
DAC サ ン シ ャ イン 03(988)7116 Ж 和 店 0488(29)244| 武蔵 小杉 店 044(733)2295 八千代 台 店 0474(84)6424 
阿佐 谷 店 03312670 春日 部 店 0487(37)2411 向ヶ丘 店 044(922)0271 { ж 店 0478(54)3741 
DAC 吉 祥 寺 0422(21)4661 JII п 店 0482(55)9131 X 和 店 0462(61)1700 FÉ EB 店 0476(93)7041 
= ൽ 店 0422(53)0101 所 Ж 店 0429(22)1171 < 千葉 県 > а 津 店 0439(54)0111 
国分 寺 店 0423(22)6117 А ¥ 店 0480(22)382| № Р 店 0473(68)4181 Ж Ж Ф JÆ 0438(22)3611 

志 Ж 店 

セ 


її 川 店 0425(24)5611 Ж 0484(73)7311І D A C 柏 0471(64)8835 
< 群馬 県 の 皆様 へ > 第 一 家電 クリ マデ ン キ ンタ ー (0272-32- 0110)$— 利用 下さ い 。 


コン ピュ ー タ 
オー デイ オ 


А CI 
¢ 「he ハ イ バ ー ブ ライ ス / 


14 ドー る 


ーー 3 回 一 60 回 らく らく クレ ジッ ト 大 学生 保証 人 な し OK 
4 オォ オリジナ ル (頭金 な し で 、3 一 60 回 の クレ ジッ ト で きま す 。 ポー ナス 大学 生 の 方 で も 気軽 に 保証 人 な し で 

I | ステ ッ カ ー | 加算 も いろ いろ で きま す 。 (ЫН) L < Dia A2) GB グレ ジッ トピ きま ます 。 
ей: プレ ゼン ト i 全 の アフ ター サー ビス 着 日 指定 で 全国 無料 配送 
“7 \ 中 | 製品 は 全て メー カー 保証 書付 、 TEL 1 本 で 集荷 便 が 集 注文 の 際 に 配送 到着 日 を 指定 し て 下 

@ 7 | 荷 に 伺い ます 。 (保証 期間 は 無料 ) さい 日 曜 ・ 祭 日 で も 0 K で す 。 


ғ- 


PLAN4 NEC 純 正 


ワー プロ セッ ト 
本 体 士 PCKD55| + PCPR 
20| 二 ワー プロ ソフ トト ユー カラ 


PLANS ワー プロ セッ ト 

本 体 士 NEC4000 文 字 モ ノ ク ロ CRT 
#58 ,800 十 エプソン プリ ンタ ーRP80 
Ғ/ТП \89.800 十 ワー プロ ソフ ト 


МЕС PC-8801 тк П-30 

標準 価格 \275,000 
PLANI 入門 セッ ト 
本 体 す シャ ー プ 2000 文 字 CRT 


PLAN2 マニ アセ ッ ト 
本 体 二 シャープ 4000 文 字 CRT 
14М522С Ұ99,800 


クレ ジッ ト 例 š i Y 28,000 + FHÁK Y 8 , 000 
la желі, e 4 — 7 X 10,000 а лав о 
レジ ッ K 4 
な - @ ^ ^ 6.500x24 回 クレ ジッ ト 例 (8675 X4f8] 
DM " NM @5F x48 (① 頭 金 な し 月 々 26,I20XI2 回 © и у 12,570X36 回 
85 xem © # үу 940൧08 @5Л X2R 5 万 X6 回 
: E y e d a um ൫38 52784 6,890X48 回 
だ た だ た だ あま , ^ // // 6, X ы 
ашасы の у уи захад ൫ и и 2,26X54E 4 万 Xx6 回 QERA 55; 4. 
a ы ананды @5 万 X3 回 @37 ХӘН ൫ / и 10,292X48 回 均等 ൫൩008 ) 
S 
МЕС PC-9801F 2 標準 価格 \398,000 PLANS ワー フロ ャ ッ ト | МЕС 9801E gains ¥ 215,000 A 
PLANI 入門 セッ ト PLAN2 基本 セッ ト 本 体 十 NEC4050 文 字 CRT PC8853N オフ コン セッ ト 
本 体 二 4050 文 字 グ リー ン CRT 本体 エキ シャ ー プ 4050 文 字 CRT എ 填 NEC プ リン ター24 ピ ン ヘ ッ ド PCPR | | 本 体 NEC モ ノ ク ロ 4050 文 字 CRT РС8851 + 
I4M522C Ұ99,800 20| キ ワー プロ ソフ トニ チコ ン 漢 神 モ LA TEA AP EDD TS TIPS TPT RISA 
Sc UE bes uncus デル II \25.000 十 用 紙 2.000 枚 シス テム ディ スク 本 漢字 ROM РС9801-01 
(Жез ; 2 vy 
Q / и 190x388 ① 頭 金 な し 月々 14,100X24 回 クレ ジッ ト 例 クレ ジッ ト 例 
83 万 X6 回 RAXAT a mus. ① 頭 金 な し 月 々 28,037X20 回 均等 
707 3,600 601i Q и и 13,000X36 回 均等 GREASE / 12 700x428 Q が / 1I,690X36 回 
377х108 Q / / 10,800X48 回 均等 ASH XM CRSA X6 回 
4 頭金 5 万 月 々 8,100 x 24E! ⑭ 頭 金 5 万 / 4,500X60 回 ORSI / 7.500X54 回 Oris 573 月 々 1 ,852X48 回 均等 
G8) 675 X Aff] ൫20018 68575 ХӘН 
NM m NS T) 
NEC PC-8801mk II -1 0 標準 価格 ¥ 168,000 J) МЕС PC-660 1 標準 価格 ¥143,000 E 


PLAN! 基本 セッ ト PLAN2 ホビ ー セ ッ ト PLAN3 入門 セッ ト 

本 体 † ニ デコ 2000 文 字 CRT 本 体 十 2000 文 字 RGB TV 本 体 十 TVY ア ダブ プター 

bic cud ഫി Y 89,800 クレ ジッ ト 例 

クレ ジッ ト 例 クレ ジッ ト 例 Тез, 月 々 4,428X24 回 

(頭金 な し 月 々 15,337XI5 回 均等 (頭金 な し 月 々 6,783X24 回 ⑭⑱Z 万 X4 回 

Q и и 10,0I4X24 回 均等 ⑭Z 万 X4 回 О и и 5,440X36 回 均等 

൫ и  / 70I8X36 回 均等 © и и 71IOX36 回 3 等 ® / и 4,310X48 回 均等 

© » ^" 30838 О # и 4.74IX60 回 均等 ④ 頭 金 な し / 3,773X36 回 
(52.475 X 6[B] ④| 万 X6 回 


PLANI 入門 セッ ト PLAN2 ワー プロ セッ ト 

本 体 上 デー ター レコ ー ダ ー 本 体 十 専用 ディ スプ レー60M43 

填 生 ディ スク 7|0 枚 + プ リン ターPC-PR40|+ デ ィ ス プ 
レー 置台 十 生 ディ スク |0 枚 


クレ ジッ ト 例 
റ] 月 々 (1 頭金 な し B^ 
23,073 X6 回 均等 11,205x 12f8] 
(② 題 金 な し 月 々 ⑱5 万 X2 回 
3,236X18 回 ② 頭 金 な し 月 々 
(8375 X3[B] 10,487 X24 回 


均等 


Ji 


受付 時 間 i 10:00--8:00 
TAS ` 
CamputerNajima 


マイ コン 


ACCURATE 
COMPUTER 
HOUSE 


PM 


ка=*0427-—53-—1 215 


部 ・ 相 模 原 店 相模 原市 矢部 3-16-3 
PHONE 0427- 1214( 代 ) 
相模 原市 二本松 3-!| 
PHONE 0427- 22 1214( 代 ) 
座間 市 広野 台 1-5129 
PHONE 0462-52-1412(1X) 
8) FATS AER 1-25-19 
PHONE 0427-28-1012(1X) 


二本松 店 
- 相武台 店 


HI FH 店 


親しい エレ クト ロニ クス を 展開 する 神奈 川 県 


ACCURATE 
COMPUTER 
HOUSE 


県 北 一 の コン ピュ ー タ プラ ザ 


気に入っ た 商品 を 見 て 触っ て 頭金 な し で 、 


ノジマ は 剖 メー カー 指定 特別 店 で す の で 、 
安心 で きる 商品 を お 届け し ます 。 


ーー デー 


理想 の 商品 が 決ま っ た 
as E お 申し 込み 下 


お 電話 ш) の 場 谷 、 


n TELES ZE 
“ч り кее. TOME tdi: NEC PC シリ ー ズ 関東 一 の 実績 . ノ っ て いた だ けれ ば 、 即 
B Ë ക (NEC ス トマ アー 会 上 期 ) こち ら か ら お か けい だ し 
さい 。 富士 通 FM シリ ー ズ 県 北 一 の 実績 ノ DRE. 
PLANI スー パー イン ポー ズ セ ッ ト PLAN? 入門 セッ ト | PLAN2 基本 セッ ト L 
標準 価格 " ав; 価格 \89,.800 Kk + FARGBCRT 
Y 219,600 xic(cz8034-CZ8010D) 本 体 (CZ803 十 TV アダ プター) E 標準 価格 \59,800 
(① 頭 金 な し 月 々 6,320x クレ ジッ ト 例 a 
36 回 均等 ① 頭 金 な し 月 々 10,460X | クレ ジッ ト 例 _ 
② 頭 金 な し 月 々 4,580X 4. "ecu 〇 ① 頭 金 な し 月 々 21,925X 
54 回 均 3 T PLAN1 お 楽し み セッ ト É 
E か 月 々 3.930※ d 12 回 お 2 万 X2 回 : 6 回 均等 
è 2418108875 AE (3) r 月 々 5,560X | 本体 十 OD ソ フト | 本 Q 7 7 9,267X 
か 月 々 2,920※ 24 回 均等 : 15 回 均等 
, @ 7 月 々 3,900X : ① 頭 金 な し В 27, үөр 
36 回 お 2 万 X6 回 24 回 | 万 X4 回 : 12 回 均等 ③ 7 ” 6,050X 
が 月 々 3,330X (5) ! В 4 3,830 х ) Ө, ! 7 3,810Х 24 回 均等 
4885177 XBR 36 回 均等 v 24 回 均等 
X кы ERE E —— шыт чылыы 7 
PLANI 基本 セッ ト PLAN2 ワー プロ セッ ト | РІ АМ? マニ アセ ッ ト uh 
K+ FAH5—CRTNH-14 _ 本体 上 ニ デ コ 高 精細 度 カ ラーCRT : | 本 体 十 シャ ー プ 2000 文 字 CRT 
票 準 価格 \228 000 DL Y 59,800 NHI4DP \89,800 二 プリ ンタ ー ` | NEW" I4MSIIC 
MB27407 \79,800 十 オス コム ティ | \59,800 十 デー ター レコ ー ダ ー 
クレ ジッ ト Bl スク ワー プロ PNIOI\28,000 十 生 : നായ 
DSL 月 々 I6,496X ディ スク IO 枚 十 スト ッ ク フ ォ ー ム — | クレ ジッ ト 例 
I2 回 ポ 4 万 X2 回 1000 枚 | PLANI 入門 セッ ト 〇 ① 頭 金 な し В #5 ,848 xX 
月 々 12,432X നക А ^ 28,329x | 本 体 十 TV アダ プター 18 回 2 万 X3 回 
24 回 均等 в. 月 々 n г. | Q я В 々 5 873X 
③ Д В AS. FISK 241695 >< 4[81 クレ ジッ ト 例 
36 回 3 万 x6 回 © ” H 々 5, 303x : ① 頭 金 な し 月 々 3,485X 30 回 均等 
: 30181919627 ж 5 回 | 36 回 均等 ③ ヶ В 々 3.944※ 
(4) 7 月 々 5 , 8234 DSS BRZII, @ 5 月 “3, 205х , 
Ж улеш шы 108] | J 
ET a 
МЕС PC8853N 標準 価格 \169,800 SHARP 14M522C EPSON RPBOF /ТП NEC РС PR20| | 
ドッ トピ ッ チ 0. 31mm, 4, 0503757 票 準 価格 \99,800 SUITS Y 89,000 標準 価格 \298,000 
カラ ー デ ィ ス プレ ー ドッ トピ ッ チ 0.39m、4.050 文 字 NEC、 富 士 通 パソ ヒア 、X! 等 に 対応 。 24 ピ ン ヘ ッ ド 漢字 プリ ンタ ー 
富士 通 、NEC 用 切換 スイ ッ チ 付 クレ ジッ ト 例 TA 
T А (〈D 頭 金 な し В 5,330 х 12] а (D 頭 金 な し В 416,461 х 18] 
$us 2%) | Ж х2 > 
Ка イレ ピット ® „ " 5,450XI6 回 © 7 „ 7,783X24 回 
(① 頭 金 な し 月 々 12,336х 12 回 均等 (①D 頭 金 な し 月 々 |4,098 X6 回 均等 А 6375 X AE] 
(2) » n 5,.62IX24 回 均等 D » 7 5. sig B x x TOPA RA ③ 頭 金 5 万 ” 19, De 
し Hg 


現 全 ご 希望 の 方 も 特別 価格 中 で す 。TE し に て お 確か め 下さ い 、 


ー カ ー 品 も 特別 価格 中 で す 。※ ク レジ ッ ト お 支払 い 方 も いろ いろ る 組合 せ が で きま す 
電話 に て 相談 下さ い 。※ お は ボー ナス 加算 額 で す 。※ お 支払 い は 銀行 通帳 より の 引落 し も し く は 金融 機関 へ の 振込 で す . 


※ 記 載 の 商品 は ほん の 一 例 で す 。 その他 一 
の で 、 お 電 


уй Ж.Х 一 


gma 50) SRI : z 


シヨ ョ ツブ が あつ だ ん で す 。 


NEC マ イコ ンプ ラ ザ 
ノジマ 相模原 店 
相模 原市 矢部 3-16-3 
TEL 0427-53-12144%) 

国鉄 横浜 線 矢 部 駅 下車 2 分 


NEC マ イコ ンプ ラ ザ 
ノジマ 二本松 
相模 原市 二本松 3-1 
TEL 0427-73-1214 
国鉄 横浜 線 橋本 駅 より バス 8 分 


座間 市 広野 台 
小田 急 線 相 葉 台 


NEC マ イコ ンプ プラザ 
ンジ マ 相 武 台 店 


TEL 0462-52-14 


M REI 0 分 


こん な 近く に 本 格 的 な マイ コン 


NEC マ イコ ンプ プラザ 
ノジマ 町 田 店 
町 田 市 旭 町 1-25-19 
TEL 0427-28-10124%) 
田 田 市 役所 より 徒歩 10 分 


1-5129 
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シャ ー プ の ボ ポケット ・ コ ンピュータ を マシ ン 語 レベ ル で 操 
作 す る の に 必要 な 情報 を 満載 し た , ボケ コン ・ ユ ー ザ ー 必 
携 の 書 で す . マシ ン 語 の 初歩 か ら 解 説 る れ て お り , マシ ン 
語 イ ンス トラ クシ ョ ン の 説明 。 内 部 ルー チン の 解析 な と ど が 
詳 述 きれ て いま す 。 豊富 な ユー ティ イリ ティ ・ ア プリ ケー:> 
ョ ンプ ログラム の ほか , オー ル ・ マ シン 語 の ゲー ム ЬЩ. 
ボケ コン を 極限 まで 活用 し だ たい 人 に 絶好 の 本 で す . 


PC-1245/1250/1251/1255/1260/1261/1401/1500/1501 


マシ ン 語 の 基礎 支 PC12 シ リー ズ ・ マ シン 語 イ ンス トラ ク 


ショ ン ・ セ ッ ト 去 レジ スタ PEEK 玄 未定 義 命令 に つい て 


Um Я 
нч авг വയം жу, 
x “ж quum БАН me 


кы 


m 
NUM 


PC-1401 内 部 解析 云 PC12/15 シ リー ズ 内 部 ROM 解 析 衣 マシ 
ン 語 モニ タ 太 FM クロ ス ・ ア セン プラ 坪 逆 アセ ンプ ラ 計 音階 
BK JU — FY XPOPSSx* CPGxPC-1500RAMZ 7 4f JL 
2261066166997 n 7 > Z. k РАЕВ SE £ í > X F 


ラク ショ ン ・ テ ー プ ブル etc. 


CPG ゴ ルフ ・ ゲ ー ム ⑧ 日 本 刑事 サイ ダー る @ ス クラ ンプ プル 
ജ്‌: - 2-൫7-71...” ホワ イト ・ ハ ウス ポケ コ 
ン 大 相撲 島 ホ ー ミ ング 旬 ボ クサ ー1500 etc. 


(5300) 
東京 ・ 代 々 木 


工学 社 


eiPC-BBOOZU-—ZAZ 


N88- BASIC 


タイ プ ・ レ ッ ス ン N88 


Туре Lesson JN88 


シン タッ クス ・ エ ラー ば か り 出 し て いる 
あな た / また , プロ グラ ム 入 力 が 遅い と 
思っ て いる あな た / この プロ グラ ム さ え 
あれ ば 大 丈夫 . 遊び な が ら キ ー 入 力 が 上 達 
する の で すか ら (?) 


18073 


プロ グラ ム を 入力 する か , テー か ら ロ 
ー ド し だ ら 6RUN し て くだ ゲ だ きる い 。 そ し て デー 
Ж を 読み 込ん だ 後 , “PUSH〔RET〕KEY. ノ “ 
が 表示 され ,| RETURN キー を 押す と ゲー ム 

これ が 一 番 文字 数 が 多く , 時 間 も か か る 


RANDOMIZE 
? RAN 


@Syntax Error I 


が スタ ダー ト し ます . 
この ゲー ム の 目的 は ,。 コ ユ コンピュータ が 乱 
数 で 呼び だ が す Nss-BASIC の コマ ンド お よび 


ステ ーー トメ ント を で きる た だけ 早く 正確 に 
や る 
も 間違え て 入力 し だ ら , も 2 一 度 入 力 し 直 


(5778, そし て これ を 50 回 繰り 返し 
25, これ まで に か か っ た 時 間 を 表示 し て 
ゲー ム ・ オ ー バ ー で す . 


്ലി 7൧൫൫൫ 


あま り だ いし だ こと は や っ て いま せん 。 
また だ た, 変数 名 や ラベ ル も わか りや すい よう 
に 付け た つも りな の で , や っ て いる こと は 
a ODS TL. 

23൦, Nss-BASIC の コマ ンド , ステ ー ト 
メン ト は ROM か ら 読 み 込 ん で いま す . 


に 


実 を いう と , 私 は プログ ラム の 入力 が と 


変数 表 


22 個 の アル ファ ベッ ト 
命令 の 先頭 アド レス 
命令 の 個数 

アド レス ・ デ ー タ 読み 込み 用 
キー 入力 用 

キー 入力 用 ( 答 ) 

問題 


問題 作成 用 


問題 の 数 
メモ リ 読 み 込み 用 


初期 設定 

ゲー ム ・ ス ター ト 

出題 時 初期 

問題 作成 

答 判 断 

ゲー ム ・ エ ンド 判断 

命令 サー チ ・ サ ブ プルー チン 

アド レス ・ デ ー タ 

個数 デー タ 
て も 遅い の で す . BASIC の 基本 ステ ー ト メ 
ント で らい は 一 応 人 並み 程度 (どの よう な 
基準 が ある の か わか り ま せん が ) に 入力 で 
きよ ます . (മാ, 肝心 の マシ ン 語 の 方 が と 
て も と て も … (88 に は 特に マシ ン 語 の ゲー 
ム が 多い と いう の に )。. 

まさ まぁ, この ゲー ム (7) が 皆さん の デ ロ 

グラ ム 入 力 の 一 助 と な れ ば 幸い で す . ちな 
жс, 私 の 最高 記録 は 3 分 03 秒 , 友人 の K 
は 2 分 27 秒 (/) で し ただ. 


人 000 Type Lesson N88 BASIC!) A F НИЕ иаа онар аран нан 


‘EN TYPE LESSON: МӘБ ШШШ 


CONSOLE ,,0,1:WIDTH 40,251CLS 
DEFINT A-Z 
DIM ADR(22) ,DNM(22) 
ALF$z"ABCDEFGHIKLMNOPRSTUVMWX " 
RESTORE *ADRDATA:FOR Ісі TO 22』READ 
ADR$: ADR (I) zVAL ("&hó6" *ADR$) : NEXT 
170 RESTORE *NDATA FOR 1=1 TO 22:READ 
DNM(I):NEXT 
180 шООРХ 
190 LOCATE 9,5:COLOR S: PRINT 
SSON N88":COLOR 7 
200 LOCATE 10,7:PRINT "PUSH [RET] KEY ! 


"TYPING LE 


210 *LOOPO E$=INKEYS :IF E$<>CHR$(13) TH 

EN *LOOPO 

220 LOCATE 10,7:PRINT SPACES (20) : LOCATE 
195,15: PRINT SPACES (10) 


300 


250  TIME$-"QO:00:00": ТІМ=0 


‚24@ *LOOP RANDOMIZE (VAL (RIGHTS (TIME$,2)) 


) 

250 LOCATE 10,7:COLOR 4:PRINT 
*1: COLOR 7 

260 ADRN=INT (RND (ТІМ) *22*1) 
270 DNM=INT (RND (TIM) *DNM (ADRN) ) 1 DAT$-MI 
D$ (൧.൦൭ ,ADRN, 1) 

280 ADR=ADR(ADRN) з IF DNM THEN GOSUB *SC 
H 

290 *LOOP2 AX=PEEK (ADR) 、 

IF АХ<128 THEN DATS=DATS+CHRS (AX) зА 
DR=ADR+1: GOTO *LOOP2 

510 АХ-АХ AND &H7F:DAT$zDAT$*CHR$ (AX): L. 
OCATE 12,10:PRINT DATS 

320 *LOOP1 LOCATE 10,12: INPUT КҮ% 

330 IF DAT$<>KY$ THEN BEEP:LOCATE 10,12 
:PRINT SPACES (20) : GOTO *LOOP1 

540 LOCATE 12,10:РКІМТ SPACES (10) : LOCAT 


"мос" TIM 


E 10,12: PRINT SPACE$(10) 

350  TIMETIM*1:IF TIM=>5@ THEN LOCATE 15 
.15:РКІМТ TIMES: БОТО *LOOPX ELSE *LOOF 
560 *SCH 

570 AX=PEEK (ADR) 』 QDR=ADR+ 1 3 IF АХ>127 TH 
EN ADR=ADR+ 1 : DNM=DNM- 1: IF DNM= の THEN RET 
URN ELSE *SCH ELSE *SCH 

380 ' 

590 *ADRDATA 

400 DATA bBa,baQ,baf,cOe,c4a,có6f,c89,c9 
b,ca4,ccf,cdc,dic,d40,d4f,d68,d9B8,dda,e2 
1,041,e4a,e58,e7b 

410 *NDATA 

420 DATA 6,3,22,12,10,7,4,2,10,3,15,9,4 
$743114,13,16,8,2,3,7,1 
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pio 


Q 


BASIC 十 (マシ ン 語 ) 


以前 に 作っ た 作品 を バー ジョ ン 
し て 楽し ん で いる この 頃 で す が , 
も そん な 中 の 1 つて で , 
古い ゲー ム で す . 
遊び 方 

2 機 の 戦闘 衛星 で 遊星 爆弾 を 破壊 し ます . 
ビー ム の 発射 キー は |@l[Z| と 2 種類 あ る の で 
ゲー ム に 慣れ な いう ちせ は 混乱 する か も し れ 
ませ ん (特に 上 下端 で は 位置 が 逆転 する の 
TE —. 

を そし て エネ ルギー は ビー ム の 発射 ご と に 
жо, ダメ ー ジ は 撃ち も る ら す ご と に 増え て 
いき ます . この エネ ルギー が が なく な る か 
ダダ メー ジ が いっ ぱい に な る と ゲー ム ・ オ ー 
バー で す . 

な お , 残り の 遊星 爆弾 数 が 0 に な る と 面 
クリ ア で , バ パターン は 6 面 分 用 意 し て あり 
ます . そし て その 6 面目 も クリ ア す る と , 
UFO を や っ つけ た が , 敵 は まだ まだ いる 


・ ア ッ プ 
この 作品 
ぼく の 第 2 作 と いう 


8 LIMIT$?FFF: 605082000 

3 DIMV$C2o  PC?BD HC?» UECE) LC?» P$C2)5 
605081500: 30561 200 
605083000: 30561 100: 605161 090 
C=C-1: IFC=ØTHENC=20: C1=U1: C2=U2 
С1=С1+4@:С2=С2-4@ 
бЕТН:ОНН-56О0Т045›,5@:60ТО6@ 
D=22-C: 807055 
р-С%2 
CURSORS: D: FRINTBS; : 5=5-1 
52=52-1:0НМ52+160Т017@@ x 
PRINTS$:S:L$::POKEI,34:PRINTS2;" "; 
10൮80519; 507020 
XzX-1: ІҒХ-06051/5800: 807020 
IFPEEKCR?=1 ZOTHENGOSUB9SQG 
R=R+P CX+F 2: USRC $8800 > : POKER; H 


MZ-1200:80K/C 


U-t4 パク ダン 


eA 


7 面目 に は 大 型 ミ サイ ル が 出 て きま す . こ 
れ を … す る と ボー ナス が も ら え ます . 


ブロ グラ ム に つい て 


КЕМ 文 を 見 て くだ きい 。 だ いだい 40 字 
未満 に まとめ て ある の で , 見 や すい と 思い ま 
+. 変数 表 と 行 番号 マッ を 表 1, 2 に 示 
し ます . 

マシ ン 語 は 星 の 表 示 と 音 出し で , そう た 
いし だ こと は し て いま せん . メイ ン も 単純 
な の で ハン ド ・ コ ン パ イル (2 ) し て も よ か 
っ た の で すか が, あま り キ レ の いい 動き に する 
スピ ー ド が 速い の も 


と 命中 率 が 落ち る し , 


ン 、 BASIC リス F Eu 


4-38: R2532484384T«4à0 

RETURN 

REM жжж 7൭ !! ホホ ポポ 

S3zINTCX/8»: ІҒН-199ЭТНЕН53-55%5 
CURSORX-1;D:PRINTS3:"0"5: 555455 
POKEI;X:PRINTP$C-C(D225-7CD2225*2) 
MUSICU$CG»):GO0SUBS680 

N=N-1: IFH=GUTU96 ロ 

PRINTS$:S:L$: :POKEI;20:PRINTN;" " 
RETURN 

050020. à: PRINT"& " 

USR #8600): 0=0+1: К=К+1 : ТЕМРО4 
11൮510 "5111010181": 15% #8500) 

` FORR=1T028-M+S2:FORR2=1T020: NEXT 
SzS*1:PRINTS$:9:L$: NEXT 

TEMPO?: IFQ=7G0T07 800 

807015 


m 


当然 で な ん の 苦労 も あり ませ ん . な お , Hx 
初 は ず ぎこちない 動き を する か も し れ ま せん 
D3, 後に な る ほど 動き が 派手 に な っ て いく 
ぶん 速く 感じ られ る で し ょ う 

また ,。 ブ ラン キン グ ・ チ ェ ッ ク グ と 連続 キ 
ーー 入力 を スト ッ プ し て いる の で , 1200 以 外 
の 方 は 多少 ちら つく か も し れ ま せん . それ 
と , この ゲー ム を や る と き は で きれ ば 周り 
を 暗く し て か ら や っ て くだ ゲ ぜ る い (グリ ー ン 
は その 方 が きれ い だ /). 


あと 書き 


Ver. 1 の 制作 中 に 星 を 点 減る きせ て い だ の : 
で す が , 一 般 的 で は な いし スピ ー ド も 落ち 
る の で 省 い て し まい まし だ た だ. 

EAT, MZ は いい 機種 で す 。 いつ か 
お 金 を た め て 中 日 電工 の GC-8 (X49,800) 
を 買い 。2200 の グラ フィ ッ ク を 笑っ て や る 
は っ は っ は っ は っ つっ … バ 。 


表 2 行 番号 マッ プ 


各 サ ブル ー チ ン へ 

罰 メイ ン 

< ダメ ー ジ 処理 , 爆発 

| 爆弾 の 初期 値 各 種 
命中 処理 , 爆発 , スコ ア 
画面 を 描く 

| HOT スタ ー ト 
COLD スタ ー ト 
7 面 ク リア 後 の ス ター ト 
タイ トル 
ゲー ム ・ オ ー バ ー 
マシ ン 語 の 書き 込み 
バタ ー ン 配置 
ここ か ら RUN T$ する と パターン を 表示 
する 
ミサ イル ・ サ プ ブ 


| ポー ナス が な いと き の 処 理 


| ボー ナス が ある と き の 処 理 


7 面 ク リア 
7 面目 の 各種 初期 値 


1066 СИК50Е0.24:РБІНТ"Фоуе)2 : "5 
1878 FORR-11TO038: PRINT "ii" 5 : NEXT 


1075 B$-LEFT$CB$,365: CURSORS, 9 


1076 PRINT "ジン ルイ Бот" РЬ" LGD: "B" 
1080 ҒОКН-170100: NEXT: FORA=1TOSG 

1085 PUKE を 11H2 Я: 002111. 05 

1090 05К(%442: NEXT 

1095 RETURN 


1100 РЕМжжж ズ タ ー ト жжж 


1150 680508860:5%- "ПИ БОБОБЕ":1%-"00ң 
1148 №20: 11520: 1553249641 24:36: (1511 


1145 
1150 
1165 
1190 
1200 


С=20:Е=0: 12=55248+1+22ж40: C2=U2 
В%-"":ҒОКН-17040:Б3-Б%%"-":МЕХТ 
Н-Н(02:Ғ-0:52-52%50%0ж10 

КЕТПЕН 

REM жжж 1TH.25-h жжж 


POKEC1;231:POKEC2; 251: 307020 1202 РКІМТ"Е":СЦИК50К12,9 
1203 PRINT "モウ チョ ッ ト 2574 TRIP. Ф" 
1295 :К=1:0=1:0=0:52=10:1=4465 
1210 Н‹1)=70:НС2)=83:НС3)=207:Н4)=215 
1215 Н(5)-225:Н(62-221:Н(72-254 
1220 U£C15-"E2F1G1B1CO":U£ C25 - "GIROE1D" 
:U$C35z2"GI1B2R2C2":U$ C4) -"B1E2DOROD" 
1225 U$(5)="E1R1D1B":U$(6)="G1B1C1E1" 
1238 1(12-364:1(225315:1<232-280:1 (42525 
3:L(5)=161:L(6)=158:L(?)=1 
= 2$=" " H B$= "n $ W$=" " 
FORRz1TO020: 2$22$ "Bi" : NEXT 
FORR-1TO40:B$-B$-* "—": NEXT 
Ef-LEFT$CB$. 9) 
FORR-1TO20:E$-E$- "c": NEXT 
K$=" YW," +CHRS (253) +" 
J$z'"440*" 
В=15596:ЕОЕВ=@Т02: POKER*B; 6: NEXT 


БЕМжжж П”уу жжж 

PRINT"E" 

FORH=1TQ15 
B=INTCRND 12*844) : РОКЕ55528+Е, 185 
B=INTCRND(C 12*848) 0025552948. 46 
NEXT: FüRA-2T022 

509. A: PRINT "E" : NEXT 
൧09695, 128: РОКЕ #8808, 208 
949902 

РОКЕ%8805» 208: ക Mais 128 
005089, 23: 011470: ——— py 
(5000. і: PRINTB$ 
CURSORQ ; 0: PRINT"SCORE : а" 
CURSOR1 5S; 0: PRINT"J2U : "iN 
CURSOR27, G: PRTNT "エネ ルキ "352 
К2%-5ТК%<К2:ІҒК<1ӨТНЕНК2%-"0"%К2% 
CURSOR36; 24: PRINT"22U -2 :";К2$; 


800 REM жжж 975у)7 жж 

805 FOKER,@:U を =LEFT を CU ま を CQ), 2) 

818 FORH=1TO19iH2=INTCRND( 1 )*9)+1 

815 05511470 വായാ 414 

820 SETAZ, А3: MUSICUS: NEXT 1 
825 05000, 1: FRINT" 222205С0КЕ":С 


URSORG, 23: PRINT" ユエ エゴ ゴロ リル 
CURSORS; 24: PRINTLEFT$(2$;, 20-M*15; 
М-М-1:ІҒМ-060701600 
80585960 
RETURN 
REM kkk 9"4 29". жжж 
IFINTCRNDC15*15»GO0TOS8868 
Fz40: T2 INTCRHDC1)*1225*7:H7199 
POKE$881R;8:GOTOS96 
TzINTCRND(12*U5 +02: F=@:H=HCQ> 
00189910, 3 


> PiO10 月 号 p104 の 「 ア ニ メ を ほとん ど し ら な い べ ん べろ 」 さ ん へ ノ 私 も アニ メ フ ァ ン で す が , 役 の それ は ちょ っ と … あ な だ の 言う よう に , 病 
気 と いっ て も 過言 で は な いで し ょ う ね . アニ メ フ ァ ン に は 少な か ら ず そう いう 傾向 が あり ます が ,。 そこ まで いく の は ほん の わずか で す . も し 
いて も , も っ と 他 の こと に も 目 を 向け て いま す . アニ メ フ ァ ン に は , 視野 が 広く て 考え ぇ 方 が 柔軟 な 人 の 方 が 多い ん で す よ , も と も と . だ か ら 
Ы മക, 狭 す ぎる よい っ て いい て す : ര്‍ശി онии PN НДЕ EMRE Т 


ei 


P$c152"DB2.", ":P$C2o-"B3 
P$ca»-"Sg^," B23232. "o" 
RETURN 

REM жжж 2ҢОр,29-һ жжж 
5155 1:15: GOSUB1 200 
S=S1:K=K1 : RETURN 

REM жжж セリ メイ жжж 
PRINT"EBE" , "жж リー セイ 1197972 വല 


PRINT» "1 FT 
PRINT," 61171 


ങ്ങു 
പായ Ë" 
8" 


PRINT, "LJ LJ "s" 
PRINT; " ",Ң NOI Ж" 
PRINT," BEEM ","й (ЕЕ4.0 Ж" 
PRINT, " നെ 


いり を を て ロニ" セイ レク 199 ま キキ ュ ウ ロ 。 " 

YELI I=" Ub- ILA ന്‌ fT399 TT 45. " 
り ま (つう = リキ 」 セ ント ォ エ イセ イエ テ ~ *TfT30922I''" 
りさ を = "セキ 』 セ ント オォ エイ セイ テ ~ チキ ュ ウ ヨ ス フエ !!" 
FORR-aTOZ2: FORAZ=1 TOLEN(Y$ (A) > 
CURSOR9, A+i6: PRINTLEFT ま を CY を CR) , A2) 
06Е(622:НЕХТ: NEXT 

151004. 

151 "010020: ദ്‌: 
TEMPO? 

CURSOR12; 20: PRINT"PUSH ANY KEV"; 
USRC$9B3»: RETURN 

REM kkk *4"-44-0"^- жжж 
CURSOR12;8:PRINT"GRHME OVER 3 
151002 : MUSIC"ZR1CIE4dF2E1E1D1C1" 
MUSIC"EERA-AIROAILIASGIAIGIE6RO" 
MUSIC"F1E1Dé,E1D1F1E6" 
MUSIC"D1C1 こ =B4R ロ E2RRLB1C1 ニ H4 " 
TEMFO? 

5=5жій: TFS>HITHENHT=S 
CURSOR12; 11: PRINT"777,5 "35 
CURSOR1 2; 13: PRINT" Z23723; "HI 
CURSOR12;15: PRINT"RESTRRT? ¿(Y N)" 
GETAS: IFHS="Y"GOSUB1 248: 607015 
10-14 207010 

GOTO167S 

ҒОЕН-17050: CURSOR12; 8 
PRINTSFCC12»; 

MUSIC "Баба" 
POKEI:12:PRINT"ENERGV OUT!!" 
FUKRE ま 1 1 昌 1 , СТ: PUKE ま 11H2.C8 

USR( ま 44): NEXT: UISRCS47»5: 50701608 
REM жжж 2257" жжж 
LIMIT$7?FFF:PRIHT"E" 

CURSOR11;S5 

PRINT"*a«sh T$ TRIP. Ф" 

K$=" BUS!" +CHRE C96) +" 01" +CHR$ C96) 
KSTAS+ "0" +CHREC 2537+" TEA aU. " 


2038 
2035 
2040 


2045 25 


2058 
2055 
2068 
2065 
2070 
зева 
5005 


Kst" 261 55 5202 "0145: C926» 
54:42, инал" 
FORH-34816TQ034861 
НӘССМІбО%с(х%.Н-54815,122-16 
POKER, R2: NEXT: 0255992൦. 201 
FOKE$SSGOR;:176:FOüKE$aS868D,. ñ 
POKE$8829,15: FUKE ま 882C, 3 
00232996, 205 

PURKE* ま さ EH1 , 83: 023025. A: FETURN 
REM жжж үе 9 ター жжж 

80564000: ONGGOTOTE1 G; 5020, 3835, 38 


58, 3888, 3185, 31368: 0-1: 307065 
5610 
5020 
3025 
5850 


=21:02=2: RETURN 

ҒОРН-10Т05й05ТЕР10:Р(Бо--41: HEXT 
FURH=5TU25STEP1 ロ iFPXH)=39』 NEXT 
20: U2=3: RETURN 
РС502--81:Р(202-159:Р(102--81 
Џ=17:02=4: RETURN 

FORR-aGTO2: PCR 9»2-41: PCR*272-7-41 
PCRF1350239: PCR 3127232 

PCH+ 19»239:PCH 335239: NEXT 
РС192--41:Рс2й2--41 
Р<57>--41:Р<3Ә82--41 
Uz14:U2-25: RETURN 
FORA=STOSASTEP1 1: FCH)=ー 
FORAZ=1 TOS 
P(R+R25=šS9:FP(R+R2+75=S3 
МЕХТ:МЕХТ:Р(382--121:Р(5о--і21 
Uz12:U2-5: RETURN 
FORRHZéTO24STEP18: FORAZ=ATO4 
PCA+AZ5=-41:PCA+AZ+3)=33 
NEXT : НЕХТ 
Р(<52-59:Р<62-59:Р<58о--і2і1 
U=13:U2=5: RETURN 
РОРЯ= 1 ТО58:РСЯ) =0, 5: NEXT 
U=14:U2=6:RETURN 
REM жжж ユ - コ ォ ー жжж 
FORRZGaTOSS:PCH»2-1: NEXT 
ҒОЕН-4670655ТЕР17: FIHEH2= ロ TO2 
PCR2*H»z-39: РСЯ2+9+4)=41 
PCRH2*H*85239: PCHB2*12»2 7-41 
NEXT 
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PCR-122-16: PCR 30 z1: PCR15»57-41 
PCR*7»-240: PCRH*11»2-1: NEXT 

RETURN 

REM жжж (%9-;) 3 EL жжж 
USRC6»: INFUT "スウ リー ン ?" 3 0: 8050 
Ес55248%58%17ж46:РБІНТ"Е": 
ҒОЕН-58Т7015ТЕР-1:РОКЕЕ» 46 
E-E*PCRO: NEXT 
FORR=40TO78:PRIHTP АЯ), : NEXT: STOP 
8070൦095 

REM жжж ミサ イル жжж 


7085 
7810 
2015 


0-%4 バク ダン BASIC!) X F 


R=R-0. 5: X=X-0. 5: IFX=QGOTO7 260 
ІҒРЕЕК<Е2-120ТНЕМ6ОТО? 100 
ІҒРЕЕК‹Е+40)= 1 20ТНЕНМ=Н- 1 : CURSORZ1 


A: PRINTN: MUSIC"G4RG": IFH-aGGOTO? SAO 


USR $3808 > : CURSORS ; T 
USR: $8827; K$):PRINT"B"; 
5൫ $8827: J$) 
РОКЕС1,251:РОКЕС2.221 
RETURN 
REM жжж T 
505067500 
TEMPO1:MUSIC"D4RSROGZE2C2D4"7D5RE"7C 


- ナ ス ナジ !! ホホ ポポ 


4 
2H2G2E4”C5# 昌 2G2E2D5SC2D6 " : 505067400 


7145 
7158 
7155 
7208 
7205 
7206 
7210 
2215 
7220 

7225 
2552 
?24@ 
?245 
72980 
7508 
7385 
7318 
7315 


CURSORS9;,9:PRINT"HO BONUS !'" 
FORRz1TO38: 05Е 62): NEXT 
ТЕМРО?: GOSUB1 498: 507015 

REM жжж рү 009 жжж 
BzT*2*1: 0250: 日 1 = 日 : 日 = 日: 0950 
8550-55: 06-51 : PUKE ま 1 1 日 1 , 66 
FORA=1TO1G: FUEE ま 1 1H2。 Я: ШЅЕ #44) 
SETR.R1:SETR,R2:R1=R1-1:R2=R2+1 
FORR?-1TOZ 

SETHE: AS: SETAE; A4 
AS=AS-G, 5: 03509440. 5: 065061 
SET4+RND¢ 12 #14: AS+RHD 1) ж10 
NEXT: SETA/2: A1: 50.2. AZ: HEAT 
ват01600 

REM жжж 7-2 жжж 
CURSORS, Э: PRINT"EONUS ''" 
5050Е7500: TEMPOS 
MUSIC"E1E1B84H1B1GIRSROE1E1R4B1"CIR 


I7ESRECF1^7E17D47D17C17D1"7E6BSGSR6" 


75328 
7529 
7390 
7488 
7405 


FORRBZ1TO3G8:PRINTS$:3:L$ 
5=5+1: NEXT: 505067400 

ТЕМРО?: 505081400: 071015 

REM ktk JUP kkk | 

USR ($2800) : CURSOR1; 11: FRINT"E イ レキ 2 


200%. キキ ュ ウ ロコ タタ 9 ヒ ~ モト リア オ サ ラ トリ モト “9. 


7410 
7415 
7420 
7425 
7438 
5 ロロ 
?505 
7518 
7515 
7520 
7525 
7530 
7935 
ഥേ 
7895 
7818 


CURSORG; 2: USRC$EA7 » 

FORR=2TO2Z2: PRINT" I": MUSIC"R3" 
NEXT: MUSIC"R3": CURSORG; 2 
FORRZZTO22:FRINTSPCCA4GQ»: 
MUSIC"RZ":NEXT: RETURN 

REM ttk pn^ 2 жжж 
CURSORX-3;T-1:PRINT"S N U ^" 
CURSORX-3.T PRINT" "Зе " 
CURSORX-3;T*1: PRINT и," 
FORA=1 TOS: FORAZ=1 TOZ: MUSIC "GA" 
CURSORX-2;T 
PRINTMIDS$ < ""a"4"4,*"".02.6) 
NEXT: NEXT: RETURN 

REM tkk アメ ン メ жжж 

505285900: GOSUB1 10A 
Ш-1:М-5: GOSUB 1 0902 : 807029 


Q 


ロス 


・ オ リン 
ル を 目指 す 選 手 に 明日 は な い . 


BASIC(SP-5030) 


ビ ピック は 終わ っ た が ,。 ソウ 
出る か 日 本 


の カー ル ・ ル イス 。 ЖО 9 秒 台 へ 突入 だ . 


プロ グラ ム の 説明 


ォ ー ル BASIC (SP-5030) で 作ら れ て い 


iT», 


ょ うか 


わずか 13 ス テッ プ な の で , 
ERT: 


S-BASIC で も 動く ん で は な いで し 

(保証 は あり ませ ん ). 

10 分 で 入力 で " 

行 番号 マッ プ と 変数 表 を 参考 に し 
表 1 変数 表 


|| ルー プ 用 カウ ンタ 


ベス ト ・ タ イム 
ラン ニン グ 中 の タイ ム 


ഭി 


は , 片手 落ち みた いな 人 間 に な っ て し まい ます . 


リア ル タ イ ム ・ キ ー 入 力 用 変数 


F= 1 て 左足 が 前 。 2 で 右足 が 前 


MZ- 1200・BUK/C 


СРБА, 


100 m (の つも り ) を [|NI (左足 ) と [M| 


HUTS 


(Æ 


AR) の キー を 交互 に タタ いて 突っ 走っ て < 


だるい 。 スタ ー ト の 合図 は ゲッ プッ プッ ピ 
YTT. タイ ム が 15 秒 を 越え る と 走行 中 で 
も 失格 を 宣言 きれ ます が, 記録 が タイ も し 


この ペー ス で も ベス ト ・ タ イム に な れる . メ / 


(山田 意 美子 ) 


сл 


Lx c "e ww. 


с. 
MES SS 
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R2 行 番号 マッ プ 


初期 画面 作成 

初期 値 化 

キー 入力 と タイ ム の 表示 

左右 の 足 を 交互 に 動か す 

ゴー ル へ 着い た か ? 

タイ ム が 15 秒 を 越え て 失格 し た か ? 
| ルー プ 

| ベス ト ・ タ イム か ? 
記録 は 向上 し な か っ た 

| 再 挑戦 


Ж; 


жез: 


〈 く は 向上 する と 再 挑 戦 び きま す . 


な お , 


ഹീ മ്‌ി. നവ 


TEET: 


mu MZ - 100m 走 BASIC リ スト К mem 


і PRINT"E":FOR I=1 ТО 38:CURSOR I,193PR 
IHT"-":CURSOR I:12:PRIMT"—-":NEXT: ТН=15 

2 CURSOR 39.11:PRINT"| ":x121:1222: X220 
:Ү2-25:5ЕТ Х1.У1:5ЕТ х2.У2:Ғті1 

5 ТЕМРО4:МИБІС"Е?Е?Е?СЗЕ6СЗЕ6СЗК6ТЕЙ":Т 
1%="@й@й@йййа" 


4 GET Gf: T-URLCRIGHTSCTIS$.2 
“8: РЕІМТ"ТІМЕ"; 


229: CURSOR 17 
11%" 


t- IF (G$z"N"O*C(F4»1) THEN RESET X1, V1:X 
-Х1%2:5ЕТ X1;.V1:F71 

Ё ІҒ сӨ$= "М? эжсР< 22) THEN RESET х2,Ү2:Х 
2=Х2+2:5ЕТ Х2,Ү2:Е=2 


M. IF 15 


277 THEN MUSIC"E3":GOTO 18 


8 IF T>15 THEN CURSOR 10.11:PRINT'Tuzt" 
+ ചാ $^-2 '":MUSIC"C2RSC?":GO0TO 13 

3 GOTO 4 
18 IF T<=TH THEN TH=T:CURSOR 17.6:PRINT 
"BEST": TH:" Ф ":MUSIC"R?R7R?":GOTO 12 


11 CURSOR 10:11:PRINT"t02 ന്‌ 


Jen C 29534 


2-4 !"SIMUSIC"CSDSCSDSE?":GOTO 13 
12 RESET X1.V1:RESET Хх2.Ү2:60Т0 2 
13 PRINT"D":END 


М2-1 


BASIC 


あな た と 友人 は 良い お 化け で す . あ る 日 , 
あな た の 友人 が 悪い お 化け に 捕まっ て 迷路 
に 閉じ 込め られ て し まい まし た . そこ で あ 
な た は 友人 を 助け に 出かけ まし た が …. 


ゲー ム の や り 方 


画面 左上 に いる の が あな だ た で, 右上 に い 


る の が 友人 で す . カー ソル ・ キ ー を 使っ て 


NN 


NN 


സ്സ 


NN 


уж 
уж 


@P.S.C. НО 


ж 


KEL, ЯС Ж ЛО rS 5 3 CATO 
ば いい の で す が , 残念 な が ら 迷 路 の 一 部 し 
か 見 えま せん . うま く カ ン を 働か せ て 早く 
友人 の 所 まで 行っ て 《 だ る さい . 

な お 下 に 出 て いる 得点 は , 1 歩 移動 す る 
кіл, 時 間 と と も に 20 点 ずつ 減っ て いき 
%%; 


進め る 方 向 し か わか ら な いか ら 苦 労 す る 


プロ グラ ム の 説明 


M (38, 18) に 迷路 の 地図 を 作っ て いま 
+. これ は 画面 と 1 対 1 て 対応 し て いて , 
1с, 0 で 通路 を 表わし て いま す . この 
迷路 作成 は 偶数 座標 の 点 を 調べ で, 壁 を 延 
ば せる 方 向 に 延ばす と いう 方 法 を と っ て い 
+. 


BLIND MAZE BASIC) А F അ 


"KXXXXBLIND MAZEXXX*t 1350 FOR Ү=М TO 18-M STEP 2 1680 NEXT 


DIM M(38,18)2,DX(4),DY(4) 1360 IF M(X,Y)-0 THEN GOSUB "Li" 1690 NEXT 

CLS 1370 NEXT 1700 X=NX:Y=NY 

INIT "CRT:I" 1380 NEXT 1710 FOR I-X-1 TO X+1 

* PCG INIT 1390 NEXT 1720 FOR J=Y-1 TO Y+1 

Р2%-НЕХСНК%( "ООЗС7Е425А7ЕФӘҒҒ") 1400 ” 1750 CURSOR I,J:IF 012,൦05 THEN PRI 
P1$-HEXCHR$ ( "000000000000 1 800"1) 1410 ” GAME START NT "в" 

PO$=HEXCHRS$ ("0000003C24000000" ) 1420 CLS 1740 NEXT 


Р%=РО%+Р1%+Р2% 
0%-Р2%%РО%%Р1% 
РОМТ% (2,1) =РФ 
FUNT ま (2。 2 ) =0% 


1450 ҒРКІМТСЗ7, 17,2 

1440 CURSOR О, 22: РКІМТ "ЕТ YS GO '" 
1450 FOR I-O TO 2 

1460 FOR J=O TO 2 


1750 NEXT 

1760 IF МОТ(Х-57 AND Ү=1) THEN "LOOP" 
1770 ” NOMAL END 

1780 MUSIC "G1GGGEEEFGGGGCCCCDEFGFFEEDDD 


FPRINT Г1,11,1 1470 IF M(I,J)-1 THEN CURSOR I,J:PRI D" 

" FOR JUST А MOMENT NT "BE" 1790 CLS:INIT "CRT:G" 

ТІ%-"ОООООО" 1480 МЕХТ 1800 CURSOR 10,10:PRINT "オリ カレ サマ 727൭൨ "IT 
CURSOR 10,10:РКІМТ "チョ ッ ト マッ テ ネ リ " 1490 NEXT T 3 "テン トリ マシ タリ " 


1500 Хт1і:Ү1:ТТ-1000: TI $-"000000" 

1510 ” MAIN LOOP 

1520 LABEL"LOOPF" 

1550 CURSOR 15,22:PRINT TT;" " 

1540 IF TT<O THEN "EX" 

1550 IF ТІ%->"000002" THEN TT-TT-20: TI $= 
"000000" 

1560 GET ൧൭: А-А5С(А9)-17 

1570 IF A<O. THEN A=4 

1580 IF А>4 THEN А=4 

1590 NX=X+DX(A)3NY=Y+DY(A) 

1600 IF M(NX,NY)-1 THEN "LOOP" 

1610 IF X=NX THEN IF Y=NY THEN "LOOP" 
1620 TT=TT-1 

1630 ЕРБІМТІХ,Ү12,0 

1640 ЕРКІМТГІМХ,МҮ1,1 

1650 FOR I-X-1 TO X+1 

1660 FOR J=Y-1 TO Y+1 

1670 CURSOR I,J:PRINT " " 


Ir. 


BASIC 


* DX DY FOR MOVE 
DX(O)=OIDY(O)=1 
DX(1)20:DY(1)-7-1 
DX(2)21:DY(2)20 
DX(3)=-1:DY(3)=0 
DX(4)=0:DY (4) =0 
” МАКЕ MAZE 
FOR X=O TO 38 
М(Х,0) =1 
М(Х, 19) =1 
МЕХТ 
РОК Y=1 ТО 17 
M(O。 Y ) =1 
M( 3 Y ) =1 
NEXT 
FUR М-2 ТО 8 5ТЕР 2 
FOR X-M TO 38-M STEP 2 
CURSOR25;, 10 
PRINT RIGHT$(TI$,2) 


1810 END 

1820 LABEL "EX" 

1830 ” TIME OVER 

1840 CLS: INIT "CRT:G" 

1850 CURSOR 10,10:PRINT "サフ ネフ イキ ツ ワ コ トカ " 
7” 0989989 072" 

1860 END 

187O ' SUBROUTINE FOR MAKE MAZE 

1880 LABEL "L1" 

1890 R=RND(5)*4: DX-DX (GR): DY=DY(K ) 
1900 IF M(X+DX+DX, Y+DY+DY)=O THEN "L1" 
1910 М(Х, У) =1 

1920 MOX*DX, Y*DY)71 

1950 M(X+DX+DXs Y*DY*DY)71 

1940 RETURN 


確率 は 5 分 の 1 も ある と いう の に ./ 


ボー ル ・ イ ン ・ ハ ッ ツ 


BALL IN HATS 


©The ATH 


HAT1: 


20 
HAT21 


HDH, メダ ル ・ ゲ ー ム に あっ た も の を 
も う 一 度 楽 し も うと , 作っ て み ま し た . 


b= 


5 つの 帽子 の 中 , 1 つの 帽子 に ボー ル が 
隠さ きれ て いま す . ボー ル が 隠 る きれ て いる と 
思わ れる 帽子 に 掛け 金 を 掛け 、 当たれ ば 2 
倍 に な っ て 戻っ て きま す . 一 度 に いく つか 


の 帽子 に 掛け 金 を 投入 する こと も で きま 
す . 

持ち 金 は 最初 $100 で す . 持ち 金 が な く 
な っ だ た だ と ころ で 。』。 こ の ゲー ム は 終わ り で て で 


ADAE 


RESEQ で リナ ン バ を 掛け て ある の て 


入力 時 は SEQ コ マン ド を 利用 する と 良い で 
し ょ う . それ か ら , それ ぞ れ の 行 を 入れ る 
と き は , で きる だ け 省 略 型 (൮. LET 
СОВОК = > /- ) で 入れ て くだ が だ 
さる に いり 2. ペル て る 
ら ず に ERROR 2 と な っ て し まう こと 
が あり ます . 


OGRE) 


хКЁКпап—2>0©Ь5, どれ も 抜群 だ と 思い ませ ん か ^. 


- 


を いま は や り の , ステ ッ プ スカ ルプ チャ ー と か シリ ンド リカ ルス カル プチ ャ ー と か いう キー ボー ド は , 旧 P 8 , 旧 X1 な ど と くら べ て どちら が 
使い 易い と 思い ます か . ぼく は , どう 考え て も 旧 の キー ボー ド の 方 が 良い と し か 思 を な い の で す . あの キー を た だ いた だ た とき の 歯切れ の よい 音 . 
ょ PiOPiO に 出し て も, どっち を 支持 する 人 が 多い か わか り ま せん . そこ で 。 ア ン ケ ー ト ・ 

ュー ナー と いう の を 作っ て は どう で し ょ うか . 全国 の 人 か ら ア ン ケ ー ト を 取る と いう こと は , 普通 の 人 に は で きま せん . TIT, アン ケー ト ・ 


Pio 


2% 


この プロ グラ ム は ,。 1 年 ちょ っ と 前 に マ クマ スタ ーL2II へ の お わび と お 返し に , Ер 
ЕЕ 4 3 X ма > 2 "lX С(Е>7:50 を し の ん で 発表 きせ て い だ た だき ます. 草々 . 
CT. いま まで MZ 用 へ の 移植 の メイ ン ・ 


ター ゲッ ト で あっ た だ JJ. の 原型 の ベー シッ 


Ball in Hats BASIC リ スト 


CLEAR :RANDOMIZE 

ОІМ Н<52,6<52,Р%5),Х<(52, Y(S):LET М=100 
RESTORE ! 

FOR Is1 TO SIREAD Р% (І) :МЕХТ I 

DATA 0205, 0710, 1305, 1910, 2505 

LET R=INT (RND (5) >) *1:LET HCR) =1 

LET R2=INT (RND (5) >) +1:1ІР R=R2 THEN GOTO 760 
LET H«XR22571 

LET R3=INT (RND (5))+1:IF HR3) >@ THEN GOTO 90 
LET H«(R3»5*2 

GOSUB 198 

GOSUB 358 

GOSUB 408 

GOSUB 458 

LET M=M+G (R3) x2 

CLEAR :PRINT :PRINT "772 *€57**»";M 

IF М<=@ THEN GOTO 448 

FOR 1=1 TO S:LET H(X1)=0:NEXT I:GOTO 60 

FOR 1*1 TO S:LET G(I1»z8 

IF. M<=@ THEN GOTO 248 

PRINT PRINT "НАТ"% 14" 2 475 ЛУ?лЛ";:1МРИТ GCI) 
IF G(1)>M THEN PRINT Mj" シカ ノコ ッ テ マ セン "GOTO 218 
LET M=M-G (I) 

NEXT I 

CLEAR 

GOSUB 610 

FOR 151 TO 5 

GOSUB &7@ 

NEXT I 

LET СОКЅОК =0, 20: PRINT സന്ധാനം 


PRINT "HATS:";STR$(G<(5)):LET CURSOR=S, 21:PRINT "HAT2:";STR%$(G(2)); 
(ЕТ CURSOR= 17, 211PRINT "HAT4:"; 

PRINT STRS(G(4))1LET CURSOR = 15, 221PRINT "(779/ BEN #:"FSTRS (М) ; "97; 
RETURN 

GOSUB 418 

FOR 1=1 ТО 5 

IF H〈1〉>@ THEN GOTO 396 

GOSUB 576 

NEXT I:RETURN 

GOSUB 418 

FOR 1=1 TO 5 

IF Н(12<21 THEN GOTO 448 

GOSUB 576 

NEXT І: RETURN 

GOSUB 418 

FOR 1-1 TO 5 


` IF HCI) <2 THEN GOTO 520 


LET നാന -1:GOSUB 676 
LET ഭാവാ *SILET 内 =Y〈1)+ る iLET CURSOR=V, W ! 

PRINT CHR$($94):FOR J=2 TO 4:LET Y(I)=Y(I)-1:GOSUB 478 
NEXT J:GOSUB る る 9 

NEXT 1 

FOR 15 TO 18 

(ЕТ CURSOR = り , N:PRINT CHR$($95):MUSIC POU ミ 

(ЕТ CURSOR = いり, iPR INT CHR$($94):MUSIC POUR 

NEXT I:FOR 1-1 TO 1@@@:МЕХТ 1iRETURN 

FOR J=1 ТО 4 

LET നാട ന -1:GOSUB 676 

GOSUB 648 

NEXT JiRETURN 

FOR 1=1 TO 5 : 

LET X«I? *UAL (LEFTS (P$ (1), 2)) iLET Y (1) =UAL (RIGHTS (P% (15, 2)) 
NEXT І: RETURN 

PRINT SPRINT "DED 72797 シマ イマ シク ・・・"“ 

PRINT :PRINT "ーーー У°-@ オー リー ---"ILET CURSOR=0, 22:END 
FOR K=1 TO 50:МЕХТ KiRETURN 

(ЕТ CURSOR=X (1), Y (1) PRINT CHR$ (32, $84, $85, $85, $83) 

(ЕТ CURSOR=X (1) +1, Y (1) *1:PRINT CHR$ ($86, 32, 32, $84) 

LET CURSOR=X (1) +1, Y (1) *21PRINT CHR$ ($84, 32, 32, $86) 

LET CURSOR=X (1) *1, Y CI) *31PRINT CHRS ($84, 32, 32, $84) 

LET CURSOR=X (1); ¥ (1) *4:PRINT CHRS ($85, $8B, $85, $95, を BB $85) 
LET CURSOR=X (1), Y (1) *S1PRINT " 

RETURN 


ー ナ ー で は 月 に 1 つ で も いい か ら 読 者 の 意見 に 対し て アン ケー ト を と る の で す . これ は ひょっと し た ら 今 後 の 日 本 の パソ ュ コン 業界 の 発展 に , 
大 き な 参 考 ほ と な る か も し れ ま せん よ . (し ゅ っ 教 の 神 ) 


TRS M LR 
Қал а E 


(2М2-1 500 


BASIC 十 (マシ ン 語 ) 


MZ-1500 は PCG, カラ ー グ ラフ ィ ッ ク , 
QD な ど な か な か ゲー ム が 作り や すい マシ ン 
で ある に も か か わら ず , РіО で は MZ-1500 
専用 の ゲー ム ・ プ ログ ラム が 見 当たり ませ 
ん . そこ で , 発表 直後 に MZ-1500 を 買っ た 私 
め が 小 さい ゲー ム を 作っ て み ま し た . 入力 
し や すい と 思う の で , 一 度 は 遊ん で みて く 


ЖОЛ 


RUN す る と , 青い 自 機 が "TIME" の す 
ぐ 下 に 表示 きれ , 右側 か ら 青 , kk, 赤 の 敵 
が 攻め て きま す . あな た は , 自 機 を | CTRL |, 
[SHIFT| キー で 上 下 に 移動 し , 自 機 と 同じ 
色 を し た 敵 を 捕まえ て くだ さい (すなわち 。, 
自 機 が 青い と き は 青い 色 を , と いう こ 


ТЕМРО 7 


RGB アタ ッ カ ー 


+). 

な お, 

を 捕まえ だ た とき 

EO. R T 

っ た とき は TIME が 100 減 り , 
iu^. 


自 機 の 色 は 自 機 と 同じ 色 を し た 敵 
に 青 一 緑 一 赤 の 順 で 変化 し 
色 の 違う 敵 を 捕まえ を て し ま 


色 も 変化 し 


を そし て TIME が 0 に な る と ゲー ム ・ オ ー 
S~T, 捕まえ や すい の は どい つか な ? 


行 番号 マッ プ 


100 
110 
120—240 


MUSIC スピ ー ド 設定 
BASIC 上 限 設定 
マシ ン 語 セッ ト 
画面 初期 化 
PCG セ ッ ト 


左 ス クロ ー ル 
HRT 
自 機 表示 

ゲー ム ・ オ ー ペ バー 処理 


その 他 


et 


ШШШ RGB ATTACKER BASIC リ スト അ 


PUS-HEXCHR$("OOSC7EFFFF7bE2400" | 


QD の ぉ か げ で , 市 販 ン フト は 結構 多い 
ос, PiO な ど で は 専用 の ゲー ム が 本 当 に 
見 当たり ませ ん . 互換 性 と いう 名 の 下 で , 
最新 鋭 機 で も わる は ず の 1500 の 機能 が 充分 に 
発揮 され な けれ ば , 1500 が 泣く と いう も の 
CT (一 時 期 の PC-8801 の よう に ).1500 ユ 
ー ザ ー の 皆さん , 一 緒 に 頑張 り ま し ょ う ね 、. 


"POINT "%Т;ТАВ(20):"ТІМЕ "$I 


520 PRINT 


LIMIT’ $B7FF 320 PF$-HEXCHR$("OOO0000000000024" ; " 

POKE$B800, $F 5 550 PO$=HEXCHR$ ("0000004200000024") 530 P=PEEK(NA+1) 

POKE$B801, %03, ФЕЗ 540 ҒОМТ%(2,1)-Р5%%Р5%%Р5% 540 IF P=TY+9 THEN I=I+5:T=T+10:TY=-(T 
РОКЕФВВОЗ, $21, $O, $D4 350 FONT$(2,5)=PO$+P1$+F2$ Ү%12%(ТҮ<2):ММБІС "*A0":GOTO 560 
POKE$B806,$11,$28,$0 360 ҒОМТ%(2,6)-Р1%%Р2%%РО% 550 IF P>O THEN I-1-100:MUSIC "DO" 
POKE$B809,$1,$0,26 370 ҒОМТ%(2,7)-Р2%%РО%%Р1% 560 USR ( $B800) 

POKE$B80C, $71 380 FONT$(2,10)=PU$+PF$+PO$ 570 Y=RND (5) * つ 5 


РОКЕФВВОр, $19 
РОКЕФВВОЕ,%10,%ҒС 
POKE$B810, $1, $E8, $3 
POKE$B813,$11,$0,$D4 


390 
400 
410 
420 


FONT$(2,11)-PF$«*FO$*FUS 
FONT$ (2,12) =PO$+PU$+PF $ 
ЕРКІМТІО,01,1 

FOR Ізі TO 999 


580 FPRINTL39,Y3, 10+КМр (5) #5 
590 AD=NA 

600 POKE AD, TY+4 

610 NEXT 


РОКЕФВВ16,%21,%1,%04 430 FPRINT 1 520 CURSOR 0,0 

РОКЕФВВ19, SED, $BO 440 NEXT 630 PRINT "POINT ";T;TAB(20) ;"TIME "%0;" 
РОКЕФВВІВ, %С9 450 Ар=%0428: ТҮ=0 - 

INIT"CRT:I" 460 FOR 1=500 TO О STEP -1 640 CURSOR 10,15:PRINT"GAME OVER" 

CLS 470 А-РЕЕК(%Е001) 


PO$=HEXCHRS ( "ООООСОҒВЗҒОООООО") 480 
P1$-HEXCHR$ ( "00000000C0E00000" ) 490 
P2$-HEXCHR$ ( "ООООООООСООООООО") 500 
PS$=HE XCHRS$ ( "0000000000000000" ) 510 


NA=AD+40% ( (A=191)-(A=254)) 
IF NA<$D428 THEN NA=AD 

IF МА>%0798 THEN NA=AD 
CURSOR 0,0 


慣れ れ ば 意外 と 楽 な の で す (? ) 


FM-7/8 


BASIC 
スー パー ベー ス ボ ー ル 


Super Baseball 


@ あ ん ち ・ じ ゃ いあ ん つ 


遊び 万 


プロ グラ ム を RUN す る と , ビ ピッチャー が 
ボー ル を 投げ て バッ ター が 打ち ます . そこ て 
[4][e] キー を 使っ て 一 番 左 に いる 人 を 動か し 
て うま く 取 っ て くだ きい . 表示 は 左 か ら 順 
に ス ュ コア, 取れ た だ 回 数 , ピッ チャ ー が 投げ 
だ 回 数 で す . 


野球 ゲー ム を 作っ て いた と ころ , 頭 が 狂 
っ て し まっ た の で , デモ 用 に 作っ た ボー ル 
・ キ ャ ッ チ の 部 分 だ け を ゲー ム に し て み ま 

と ころ が , 意外 と 友人 達 に 「 面 白い 」 と 
いう 評価 を 得 た の で , 発表 し て みる 気 に な 
り ま し た . プロ グラ ム も 短い の で , жой 
ん で や っ て くだ さい 。 


ひと り ご と 


アン チ ・ ジ ャ イア ン ツ ファン の 私 に と っ 


с, 今年 は と て も 愉快 な 年 で し だ . 来年 も 
を そう で あっ て ほし い , と 中 日 と 広島 の 選手 
た ち に お 願い し て この 原稿 を 終わ り に し だ た い 


ょ 思い ます . 


先日 うち の 高校 で 文化 祭 が あり , 私 の 所 属し て いる コン ビュ ー タ 部 も 展示 を や り ま し た . だ た くさ ん の 人 が 見 に き て くれ だ ん で す が ,。 その ほ 
と ん ど が ゲー ム め あて で を その他 の 展示 は あま り 見 て も ら え ませ ん で し だ .「 コ ンピュータ は ゲー ム だ け で は な い 」 と いう こと が わか っ て ほしく 
t, 星 占 い Tee y nd note を せっ か く 苦 労 し て 作っ だ ん で すけ と ど ね . 来年 は ロボ ッ ト な ん か や っ て みた だ いと 思い ます . 

(by こ れ は |!/O に 送っ た 方 が いい か な と 思い つつ PiO に 送る Tettch 改 め ふ ろ эо) 


A i 


1 の の 
11 の 
120 
130 WIDTH ദമ, 25: CONSOLE 0,25,0,0 

140 DIM HERIX(2 の の ) 

160 J=Q: T=Q: SC=Q: PP=55: CK=77:PLX%=25: BL を 
= "Ü о" 

മമമ CLS 

210 LOCATE Ø,24:COLOR4:PRINT STRINGS (79, 
"Ç" m" ) 3 

220 LOCATE PP,22:COLORS:PRINT"A";:LOCATE 
PP,23:PRINT"M"; 

250 LOCATE CK,22: OLOR6: PRINT "A" ; :LOCATE 
CK,23:PRINT"M"; 

.240 LOCATE PLX*,22: COLOR4: PRINT"A";:LOCA 
TE PLXX,23:PRINT"M"; 


DLE T 


'FM-7 Super Baseball Game - Ver 1.0 


か な り 前 に 作っ た プロ グラ ム で , 本 物 と 
は ルー ル も 少々 違い ます が , な か な か 楽し 
め る と 思い ます . 


遊び 方 


まず , か け 人 金 を 決め ます . |[1| を 押す と $ 
100, [2] を 押す と $500, [3] を 押す と $1,000 
ずつ か け 金 が 増え て 持ち 金 が 減っ て いき ま 
+. まだ, [Al を 押す と 持ち 金 す べ で て が か 
けら れ , [о を 押す と か け 金 を クリ ア し ま 
す . 


を し て , か け 金 が 決ま っ た ら |RETURN| キ 
PINAL TA 75. TS k, rr 


+++++++ BLACK JACK жж 


FM-7/8/11 (F-BASIC) 
1985ж 10А 18 (SAT) 
Copyright Kohtaroh Shindo 


20 DEFINT C:RANDOMIZE TIME 

20 DIM CA(3,12) ,CM$ (2) ,CN$ (12) ,DZ (1,9) ,C 
(3) ,SC(12) 』 MD= 1 の の の 

4 の WIDTH 40,25:CONSOLE 0,25,0,0:CLS:COLO 
R 7 

50 GOSUB 44Q:LINE(1,12) (628,44) 。PSET 。7 。 
E 

60 FOR I=@ TO 2:КЕАр CM$ (1) ,C (1) : МЕХТ 

70 FOR ї=@ TO 12:READ СМ%(1),6С(1):МЕХТ 
80 LOCATE Ø,Ø:FRINT"##+#+#+#+ BLACK JACK жж 
AOKI ORIGINAL жжжж" 

90 LOCATE 1,2:PRINT"SCOER :" 

100 SYMBOL (10,60) , "COMPUTER CARD" 。 4 。1 
110 SYMBOL (10,130) , "YOUR CARD",4,1 

115 LINE(1,48)-(628,199) ,PSET,7,B 

120 ' 

130 LOCATE 1 。 さ 』PRINTUS TNG" モチ キン 
"S MO; sPRINT"Q" 

140 LOCATE 1 ,4:PRINTUSING" 77%: 
"KA iPRINT"Ø" 

150 A$=INKEY$:IF А%="@" 

= の 

160 IF А%="1" 

A=KA+10 

170 IF А%="2" 

A=KA+5Ø 

180 IF A$="3" 
: KA=KA+ 1 の の 
190 IF A$=CHRS (13) 

ze r 

200 IF A$="A" 

21@ GOTO 1з@ 

220 ' YOUR CARD 

220 a$-"":Y-Q:TT-O:LOCATE 8,2:PRINT SPC( 

12) : GUSUB 480 


1 SHHHHH# 
1 SHHNHH#H 
THEN MO=MO+KA: КА 
AND МО=>1@ THEN MO=MO-10:K 
AND МО->50 THEN МО-М0-50:К 
AND МО->100 THEN МО-М0-100 
AND КА<>@ THEN GOTO 2 


THEN KA=KA+MO: MO=0 


BLACK JACK 


250 LOCATE CK+1 , 22: COLOR6: PRINT" ^"; 
(2620 LOCATE 3@,1:COLOR7:PRINT USING "SCOR 
Е:#####";5С 
265 LOCATE 55,1:PRINT USING "#####/";Т;: 
PRINT J 

270 XX-2CK-1:Y*221 
280 LOCATE PP+1 。22』FDR I=@ TO 19:PRINT " 
"s BLS; CHR$ (29) ; : NEXT 


290 LOCATE CK-1,22: COLOR6: РКІМТ" ~^"; CHRS ( 
28);" "3 


500 I4-0:CF74-0 
510 F=.09+(RND(1)-.5)%.013V=1.6+(RND(1)- 
3) 
320 WHILE (XX>1)AND(YX>1 ) AND (YX く 2 さ ) AND (С 
FX=@ ) 

330 LOCATE Х%,ҮУ:РБІМТ" "3 


プラ ッ ク ・ ジ ャ ッ ク 


൫57. 


々 が カー ド を 2 枚 ず つ 配 っ て くれ ます 。 š 

だ 欲し いと き は [0| を 押し , も うい ら な く 」 

な っ た だ た ら |RETURN| キー を 押し て くだ さい . 
な お , 役 に つ いて は 以下 の と お り で す . 


スペ ー ド の A РЈ 3 f 
7 が 3 枚 の と き 3 fF 
5 枚 で 勝っ た と き 5 
6 枚 で 勝っ た と き 61 
を その他 2 倍 


フロ グラ ム に つい て 


フロ ー チ ャ ー ト も 書か の かず, コンピ ュー タ 
の 前 に 座っ て 四苦八苦 し な が らい き な り 作 


BLACK JACK BASIC!) А F аш 


240 CM=INT (КМ0 (1234) :CN- INT (КМО (1) #13) 
250 IF FO0«2 THEN GOSUB 300 ELSE A$-INKEY 
$ 
260 IF A$-"Q" AND FO<6 THEN GOSUB 200 
270 IF A$-CHR$(12) THEN 550 
280 GOTO 240 

299 ・ SET CARD 

300 IF CA(CM。CN) = の THEN CA(CM。CN) =1 ELSE 
CM=INT (RND (1) *4) 』 СМ=ІМТ (КМО (1) *1 さ ) : GOTO 
300 
310 IF ടമ THEN 07 ‹0,Ғ0) =СМ:07 (1 。FD) =CN 
220 IF CN= の THEN ACE=ACE+ 1 
520 (ІМЕ(10%Ғ0ж100,140-Ү)-(106%Ғ0ж%100,19 
5-Y),PSET,7,BF 
340 SYMBOL (46+F0%100, 160-Y) ,CM$ (CM) 3,2, 
C (CM) 
350 SYMBOL (12%Ғ0%100,141-Ү) 。CN$(CN) ,2,1, 
C(CM),0 
260 SYMBOL (104+F0%100, 194-Y) , CNS (CN) ,2,1 
。C (CM) 2 
370 FO=FO+1 


380 TT=TT+SC (CN) 


390 IF ТТ>21 AND АСЕ<>0 THEN ACE-ACE-1:T 
T=TT-10 
400 IF Ү=0 THEN LOCATE 8, 21PRINTUSING"## 
ы Ег; 
BEEP1:FOR I=@ ТО 50: МЕХТ: ВЕЕРО 
RETURN 
4 RESET DATA 
FOR І-0 TO 3:FOR 2-0 TO 12 
СА(1,2)-0:МЕХТ J,I 

ACE=Q: ТТ=@:ЕО=@:А%="";ТТ=@ 
КЕТМЕМ 


IF Ғ1<МІ THEN F1=MI 

FOR Y120 TO 1:FOR Х1=@ TO Ғ1-1 
LINE(19*X1*100,140—-Y1*«70) - (106*X1*10 
0,195-Ү1%70) ,PSET,O,BF 


'520 NEXT:NEXT』 IF ലമ THEN FOR I=0@ TO 1 


"000:МЕХТ 
550 RETURN 


スー パー ベー スポ ボー ル BASIC U 2 F mm 


ГД, 


540 ІХ=17/2.8: XAzZXX—1: YA221*F *IXX*IX-V*IX 
350 COLOR7:LOCATE XA, YA: PRINT BL$; 

360 A$=CHR$ (PEEK (&HFDO1)) 

570 LOCATE PLX*4,22:PRINT" "; :1 ОСАТЕ PLX% 
4,2351 PRINT" "::PLXX-PLX** (A$z"5") ж (PLXX«S 
4) -(At="4") * CPLXX21) 

580 COLORS: LOCATE PLX4, 22:PRINT"A"; : LOCA 
TE PLXX,23: PRINT"M"; 

590 IF (XZ=PLXZ)AND(YZ=>21) THEN CFA=1:T 
=T +1 : ВЕЕР 

400 1/=1/+1 

410 WEND 

420 FOR IX=Ø TO 4000: NEXT: J=J+1: SC=SC+CF 
**100: БОТО 200 


勝て る も ん な ら 勝 っ て みい 


$4848 BLACK JACK $49 AOKI ORIGINAL 66866 
E i | 


3045 : 3588 | 
|COMPUTER CARD | 


{ 


YOUR CARD 


Í 
| 
Í 
| 
| 
| 
I 
Í 


り 上 げ ま し た だ ただ. その だ め , 変数 表 や 行 番号 
マッ プ も あり ませ ん . 

gis, も し か する と サブ ルー チン の どれ 
か が 他 の トラ ンプ ・ ゲ ー ム に 使え る か も し 
れ ま せん . いろ いろ と 解析 し て みて くだ きき 


b. 
最後 に 


FM-7 を 買っ て わずか に 1 箇月 で らい し 
か た だ た っ て いな い 頃 に 作っ た プロ グラ ム で す 
が 。 いか が て で "しょう か? MW TARY 
の 頃 か ら BASIC は 知っ て いま し だ た だが. 


540 SCOER SET 

550 IF TT>21 THEN YU= の ELSE YU=TT 

560 TT-0:MI-FO:FO-0: Y=70 

570 CM=INT(RND( 1 ) +4) : СМ= INT (RND (1) +13) 
580 IF ТТ<16 THEN GOSUR 200:1 ОСАТЕ 11,21: 
PRINTUSING"VS ##"; ТТ: GOTO 580 

S90 IF ТТ>21 THEN ТТ=@ 

600 IF MI-2 AND YU-21 AND (DX( の 。 の )= の ANDI 
DX( の 。1) = の) AND (DX(1 。 の )=1 の OR DX(1 。1 ) =1 

മാ THEN MO=MO+KA*3: GOTO 650 

610 IF YU=21 AND MI-3 AND DX ん (1 。 の )=7 THEN 
MO-MO-*KA*3 

620 IF YU く <=TT THEN KA-0:PLAY"T16002G84":G 

OTO 690 

630 IF MISS THEN MO-ZMO-*KA*2:KA-0 

640 IF MI=S THEN MO=MO+KA*S: КА=0 

650 IF MI=6 THEN MO-MO-KA*6:KA-0 


660 FLAY"T20004L16CDEFGAB" . 


670 F1-FO:GOSUR 440:GOTO 130 
680 '- - - GAME OVER 
590 IF МО<>@ THEN 670 
700 SYMBOL (200,16) , "GAME OVER",4,2,5 
710 FLAY"RAGBR16GBR16G8R1664" 
720 FOR I-0 TO 5000:МЕХТ 
730 LOCATE 20,4:PRINT"PLAY AGAIN(Y,N)?" 
740 А%-ІМКЕҮ% 
IF A$-"Y" OR А%="у" 
IF A$-"" THEN 740 
FOR I=@ TO 199 
LINE (9,1) – (659,1) ,PRESET 
NEXT: LOCATE Q,0:CLS: END 
FOR І-0 TO 219 
LINE(I,Q)-(1,199) ,PRESET 
LINE(639-I,0) -(629-1,199) ,PRESET 


THEN 800 


1010 DATA $,0,9,2,9,2,4,0 
1020 DATA 8,11,2,2,5,53,4,4,5,5,6,6,7,7 
1050 DATA 8,8,9,9,10,10,2,10,0,10,К,10 


ンプ ワー スズ 


SUPER TANK 


あな た は どう いう わけ か , 地雷 や ワー プ 
・ ト ン ネ ル , ダイ アモ ンド , そし て ぶつ か 
る と 逆 方 向 に 動い て し まう 恐 し い 頁 が ある 
と いう 森 の 中 へ と 迷い 込ん で し まっ た の で 


し た. 


モー ド は 1, ペー ジ 数 は 2 です. 入力 し 
て RUN す る と , タイ トル が 表示 る れ て サウ 
ンド が 鳴り ます .| RETURN | キー を 押し て ゲ 
ー ム を スタ ー ト る せ て 〈 く ださい. 

あな だ は 左上 に いる タン ク で す . これ を 
上 手 に 動か し て , ダイ アモ ンド を 拾い 集め 
て く ゲ きい 。 この と まき, 壁 に ぶつ か る と 逆 
方 向 に 動き , ワー プ ・ ト ン ネ ル に ぶつ か る 
と どこ か に ワー し て か ら ま た 動き 出す の 
С, と て も 危険 で す . さら に , 地雷 に ぶつ 
か る と 即 ゲ ー ム ・ オ ー バ ボー で す 。 た だ し , 
タン ク が 通っ だ た 跡 は ぶつ か っ て も 構い ませ 
^. 

この よう に し て 面 を クリ ア す る と ボー 
ス が も ら え ます . 


REEN 
s 2» 2: CONSOLEQ, 16, 8, 87 


:CLS 
228 COLOR d: LOCRTE B, Өе: INES 
ORE <TANK? HI-SC ].^ 
348 COLOR 2:ҒОР I-1 TO 14 

358 LUCRTEB, І: PRINT "OO ロロ ロロ ロロ ロロ ロロ 
ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロ " ; : NEXT 


368 COLOR 1:FUR 7-2 TO 13 
378 LOCATE 1,7:РБІМТ 
"NEXT 


380 FOR І-1 TO 15 
398 COLOR 2: сосе best ЕМІС12ж24%4,Е 
NDC1)*7+d: PRINT 
498 COLOR 3: LOCATE RNDC1)*29+1,R 
NDC 1)* 12+2: PRINT "х" 
418 COLOR 4: зу ЕМрС12ж29%1, Е 
NDC1)* 12+2: PRINT 
428 COLOR 1: LOCATE” RNDC1)*29+1, R 
NDC 1) *ж12+2: PRINT "Н" 

NEXT 


COLOR 3 


LOCATE 6, 8: PRINT 
LOCRTE 26; 


ലട, "o?132cde 
с 


а 
9250 GOTO 495 
MAIN 


=—1: $= 
1:T$- 
1: B= B:T$- 
IF T=? THENR--1:B- 8: T$= 
. IF SCREENCX-R, Y-B»«»RnSCC" 
THEN GOSUB 618 
578 COLOR 1:LOCRTE Х,Ү: РРІМТ" · 
588 x=x+ñ :Y-Y-B 
598 COLOR 3:1 ОСАТЕ «,Y: PRINT T$ 
688 GOTO 588 
618 REM 一 は A た ヾ ん 


タン ク 


270292568907 


ォ ー ル BASIC だ し プロ グラ ム も と て も 
短い の で , 特に 説明 する 必要 は な いで し ょ 
5. その 代わ り , 変数 表 ( 表 1) と 行 番号 
v7 (#2) を 載せ て お きま す . 


628 P=SCREENCX+A; +B) 

625 IF P=RSCC"・" う THEN RETURN 

638 IF Р-ЕВ5ССс"%"2 THEN PLAY "od 

32с32":5=5+10: D=D+1: GOTO 668 

648 IF P=ASCC"X"2 THEN 80101199 
IF P=RSCC" 村 " う THEN GOTO 899 
IF P=ASCC"O") THEN GOTO 7800 
REM - PRINT SCORE SUB 
COLOR 3:LOCRTE 6,8: PRINT S 
IF D-18 THEN GOTO 988 


"o6fH32" 
1 THEN A=-1: КЕНЕ! 
IF A=-1 THEN A= 1:RETURN 
IF B=-1 THEN B= 1: RETURN 
IF B= 1 THEN B=-1: RETURN 
REM- "ti" SUB 
Vae A ъч boe at iit а оен inaa 


2o05cdef gfedc 
828 COL ар 1? LOCATE Xs Y: PRINT" 


838 X=INT CRND വാ «28) +2: Y=INT CRND 
(12*10) +3 

в48 FOR Ісі TO 5088: МЕХТ: RETURN 
988 REM - GO NEXT 

918 CLS: LINEC8, 82—C256; 1922, RNDC 
12 *8+1, B 
928 COLOR 2:LOCRTE 1, 1: РРІМТ "жж 
жжжжжж NEXT PATTERN жжжжжжжж" 
Елеш ыш d: LOCATE 1.5:PRINT "BO 


Р=ІМТССРМрс 1) « 100) +1) * 10 
не 2: LOCATE 1, ?: РРІМТ Р 
А$= "о? l 16adadadadadadadad" 
B$-"o8li16aabffbcbcbgeeccd" 
C e AP OR МАЛА ne 
PLAY A$, C$, B 

PLAY АФ, C$ 
പി kiba ます 
ВФ= "081 16cdefgabcdefgab4" 
C$-"o6l16dgdgfdecbcgcdgd4" 
PLAY АФ, ВФ, C 

FOR 151 TO 1888:NEXT 
GOTO 228 

REM — END END 

PLAY "= 1080442", 

1806g2":IF S>H THEN H=S 


1128 LOCRTEX;Y:COLOR2: PRINT "X" 


ゆあ る 日 , 僕 の 友人 が 「16 ビ ピット 買っ ちゃ っ た ぁ 一 」 と 騒い で いた の で , そい つの 家 へ 行っ て みた . する と … 


ハイ ・ ス コア 
Ray 
タン ク の X 座 標 
タン ク の Y 座 標 
ダイ アモ ンド の 数 
タン ク の 進む 方 向 
タン ク の 進む 方 向 
STICK( 0 ) の 値 
タン ク の 形 


н 
$ 
X 
Y 
D 
A 
B 
т. 


デー タ 
Ғог--Мехі 
For~NextĦ 
ボー ナス 得点 


| ミュ ー ジ ッ ク (PLAY ) 


表 2 行 番号 マッ プ 


100-- 120 
200-- 220 
300-- 460 
480-- 495 
500-- 600 
610~ 650 
660~ 690 
700~ 740 
800~ 840 


初期 設定 (1) 

初期 設定 (2 ) 
画面 を 作る 

キー 入力 待ち 

メイ ン ・ ル ー チ ン 

判断 

スコ ア 表 示 

壁 に ぶつ か っ た と き の 処 理 
ワー プ ・ ト ン ネ ル に ぶつ か っ た 
と き の 処 理 

GO NEXT/ と 

ボー ナス ・ サ ウン ド 
ゲー ム ・ オ ー バ パー 

デモ 

REM 文 


900--1060 


1100-1160 
1200—1430 
1500—1530 


1138 COLOR 4:1 ОСАТЕ 1,5:PRINT “ж 
жжжжжжжж GAME OUER жжжжжжжжжж " 
1148 COLOR 3:LOCATE 1,6:РБІМТ "ж 


жжжжжжжж HI S KEY жжжжжжжжжж" 
1145 EXEC&H1 ロ 58 

S" THEN PRINT СН 
1168 GOTO 1158 
1208 REM — DEMO * DEMO 

1218 SCREEN 2,2, 2: 050൧59, 16,8, 
Ө: COLOR’ 1; P: 


CLS 
_ІМЕ СӨ, 82—C256; 1925, 4. B 
8 COLOR 4 


OH 4. 3: PRINT 
Р 7a: 
7» 5: 
756: 
7,7%: 
738: 
7.9: 


"иж A 
PRINT ^ 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 


あと " 
LOCRTE 
LOCRTE 
LOCRTE 
イヤ モン ト ゞ 
1275 LOCATE 
ー フ ” トン ネネ 比 “ 
LUCRTE 


A -,oSli6ccdfdfdfdgebdgad" 
B$-"o7?7l16ccddeeffggaabbcc" 
C$—-"o8lií6cddfffdddccddaaa" 
PLAY ñ$, B$, C$ 
fi$="o6116cffcfcdfccfdgcfd" 
B$-"o"7l16efefefefbababbed" 
Bee ag ggffgaabafdd" 
PLAY ñ$, B c š 
FOR М To ' 688: NEXT 

ӨӨ COLOR 1:LOCRTE 7,11:РРІМТ " 

vc RETURN KEY" 

18 IF ІМКЕҮФ-СНРФС132 THEN RET 


IF INKEY$-"" GOTO 1418 
PRINT CHR$C7);: GOTO 1418 


РЕМ ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ 
REM ж 22 RIV タンク rt ж 
REM * РС-6081 16kb Раде2 ж 


РЕМ ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ ポポ kk 


「 び ぴゅ う 太 」 が 置い て あっ た . 
(ネアンデルタール 渡辺 ) 


PIO 


ラン ド ・ マ イン 


LAND MINE 


その 日 , サン ダー ス の 分 隊 は 瑞 基 地 と 味 
方 基地 の 混同 する 世に も も ストー リー 性 の な 
い 戦場 “ 星 -2 戦 場 " (前 に も 使っ た な …) С, 
た っ た 3 両 の 戦車 で 進撃 し て 行っ た . 

この 地区 に は 無数 の 地雷 と な ぜ か 1 PEO) 
エイ リア ン が いる . サン ダー ス ら は これ ら 
を 駆使 し て 瑞 基 地 を 破壊 せ ね ば な ら な い の 
だ っ た …。 


GAME ORB 


ЖІ 行 番号 マッ プ 


初期 設定 

デモ 表示 な ど 

画面 表示 

メイ ン ・ ル ー プ 

PEEK SUB 

[S] キー を 押し た 後 の 処理 
キャ ラク タ 定 義 と デー タ 
面 ク リア 
MISS ルー チン 

GAME OVER 


a 


ьоо-»---4<о-- 
оооооооооо 


らら っ の ょ ょ いら 一 


10 DIMC (5) , B410) : OPTIONCMODE 1 
20 РОКЕ1,%АА: GOSUB620 
ЗӨ REM--- DEMO --- 
40 S20:U21000: N23: 4-1: CLS: PRINT: PRINT 
50 PRINT" അ rm wa we S g 
ч ഈത്ത 
60 PRINT" അ А, അ S HM а шаа шш 
Е " 
70 PRINT" അം ИН иш п шы uli mu 
Ел у 
80 PRINT:PRINT 
9 の PRINT" BLAST MANY ENEMY'S BASE!" 
100 PRINT:PRINT:PRINTSPC(14);"CAST" 
110 PRINT:PRINTFLD(1);" ! қ ( 
ү +" 
120 PRINT:PRINT" 
MY BASE" 
130 PRINT:PRINT"BONUS TANK FOR 1 の の の +EVER 
YSODOPTS" 
PRINT" COPYRIGHT 1983 BY K.K SOFT" 
PRINT: PRINT:PRINT" HIT ANY 
NE 
PICKK: IFK-0GOTO160 
REM--- CRT --- 
РОКІ =%С 1 00ТОФСЗЕҒ : РОКЕІ , 0: NEXT: LOCAT 


TANK ALIEN MINE ЕМЕ 


199 PRINT"SCORE "$; S: LOCATED, 12: РКІМТ "STA 


GE "А; " TANK ";N 

200 FORI-$C120TO$C13F:POKEI,$8B:POKEI-4$2 
С0,%8В:МЕХТ 

212 FORI-32T0704STEP32:POKE$C120«*I,$8B:P 
ОКЕ%С15Ғ%1,%8В:МЕХТ 

220 FORI-OTOA*19: LOCATERND (19) +3 ,RND (28) 
+2:PRINTFLD (1); "#"; 

230 BEEP1:NEXT:FORI=QTO4Q+A%1 0: LOCATERND 
(17) +4 。RND (26) +3: BEEP 1 

240 PRINTFLD(1);" ("3 :BEEPO: NEXT 

250 FORI=0TO40: LOCATERND (19) + さ 。RND (28) +2 
260 PRINTFLD (1); ")"; :NEXT: X=$C141:Y=$C3D 
E:C-$83 : 

270 REM--- MAIN --- 

280 РІСКК: ХІ = (К=%4В) - (К=%4А) 

290 Хі=Х1+ ( (K=$4D) - (K7$49) ) #52 

500 IFK=$53G0T0440 

510 1ЕХ1ТНЕМХ2=Х1 


人 @ 古 山 啓 一 郎 


と いう わけ で , 左上 か ら 出 て くる 戦車 を 
LUM] 2110 で 操作 し , [5| キ ー で 砲弾 を 撃 
t, 地雷 を 爆破 し て くだ さき さい. その 爆風 で 
蔽 基地 を 破壊 する わけ で す が , この 爆風 は 
一 定 範囲 内 に ラン ダム に 発生 し ます .。 そし 
て この よう に し て 敵 基 地 を 10 箇 所 破壊 し て 


207 7:37; 
そし て 自分 が や られ る 場合 は , 
表 2 変数 表 


ЖАҚ” 

常に 3000 
タン ク の 数 

面 数 

キー スキ ャ ン 
タン ク の 位置 
エイ リア ン の 位置 
PEEK Off 
自分 の キャ ラク タ 
ミサ イル の 位置 
爆風 の 位置 
破壊 し た 基地 の 数 
面 ク リア ・ フ ラグ 
ルー プ 用 


IF (K«$4E)3 (K 2$48) THENC=C (К-9648) 
Р=РЕЕК (Х+Х 1) : IFPGOTO420 
РОКЕХ,0: Х=Х+Х 1 : POKEX,C 

Y1 =(RND C3) 212 *X32*RND C3) -1 
Р=РЕЕК (Y+Y1) : IFPZCGOTO919 
IFPz$8BTHENY1-0 

POKEY , മഃ POKEY+Y1 , $87 
BEEP 1 : BEEPO 

YzY*Y1: GOTO280 

REM--- PEEK --- 


IF (P=$87) + (Р=%88) GOTO910 
X1-0:GOTO34Q | 

REM--- SHOT --- 

X 1 = の : Z=X: IFABS (X2)=S2THENC1=$86: GOTO 


С1=%85 
Z=Z+X2』P=PEEK (2) : IFPBDTD49 の 
РОКЕ2,С1:ВЕЕРІ:ВЕЕРІ:РОКЕ2,0: BEEP の 』 6 
070479 
490 IFP=$8AG0TO910 
500 IFP< >$88G0T0310 
510 FORI=1TO10: B=Z+( (RND (3) 1 ) * さ 2+RND (3) 
ー1 ) *RND (3) 
520 P=PEEK (В) : IFPBDTD56 の 
550 POKEB, $A: В (1) =В: BEEP1: BEEP 1 : ВЕЕРӘ: NE 
XT 
540 FORI-1TO19:POKEB(I),0:NEXT: IFBBDTDBg 
@ 
550 6070510 
560 1FP= 多 9THENBEEP 5=5+ (RND (3) +3) #1@:Т= 
T+ 1 』 TFT=1 の THENG= 1 
570 IF (P=C) + (P=$81) + (P-$8A) 6070910 
580 LOCATE の 。6』 PRINTS 
590 IF (S>=U) THENN=N+ 1 : リ = リ +2 の の の : LOCATED, 2 
9:PRINTN: BEEP 
BOTD5 さ の 
REM--- DATAS --- 
ҒОКІ-%С000709С007:РОКЕІ,0:МЕХТ 
FORI«$COO8TOS$CO67: READA$:0$2"$"«A$ 
AVAL (A$) : POKEI , A: NEXT 
FORI=1TOS:READC (1) : NEXT: КЕТ 
рАТАЗ8, 1 の 。D6。FE 。C6 。D6 。C6 。FE 
DATAFE 。 じ 6 。D6 。C6 。FE 。D6 。 1 の 。38 
DATAFC,FC,89,AF,89,FC,FC, മ 
DATASF,3F,91,95,91,5F,3F, の 


RE THE i olab- ER 


ORR TEHRE も 破壊 し て し まう 
9 地雷 を 踏ん え で し まう 
エイ リア ン に ぶつ か る 

9 味方 基地 を 攻撃 する 

TT, それ か ら , 戦車 は 1,000, 4,000 … 
と 3,000 点 ご と に 1 両 ず つ 増 えま す . 

23൦, 右 下 か ら 出 て き て ラン ダム に 歩き 
回 る エイ リア テン は , 勝手 に 基地 や 地雷 を 消 
し て いき ます . その だ め , 早め に 面 を クリ 
7 (есе, ニッ チ も サッ チ も いか な いこ 
と に も な りう る の で 注意 し まし ょ う . 


оог 


毎度 毎度 古い ゲー ム で すみ ませ ん ね . これ 
は 1983 年 7 月 20 日 作 で , 前 作 の PUZZLER 
ょ より 古い の で ある . 最近 な に か と 忙し く , 
新しい ゲー ム を 作る ヒマ が な い の で ….。 も 
うす ぐ で ぐ 受 験 で も ある し ……. 

まあ . そ うい うこ と で また 負い まま も 92 


рата മ, 0, 0,48; 0, 0, 0, Ø 
DATA10, 0,10, 0,10, 0,10, മ 
рАТАЗС,56,07,07,7Е,5С,24,6С 
DATA 0,10,538,54,ҒЕ,54,58,10 
рАТА10,10,58,258,74,7С,ҒЕ,ҒҒ 
DATAFF ,81,BD,BS,BD,BD,81,FF 
DATA24,49,92,24,49,92,24,49 
DATA28,7D,E7,7B,B6,7F,EF,S5A 
рАТА%8В1,%84,%85,%81,%82 
REM--- CLEAR --- 
620: FORJ-OTO2 
FORI-ZQTO2SSSTEPS: POKE1,I: BEEP1: NEXTI 
FORI-25STOOSTEP-S5:POKE1,I: BEEP1: NEXT 
1: NEXTJ: BEEPQ: PUKE 1 , $DO 
850 FORI-QTO1:FORI1-0TO2: BEEP1:FORJ-7OTO3 
Ø: NEXT: BEEPO 
840 ҒОК2-0Т7050: NEXT: NEXT: FORJ=0TOSO: NEXT 
: NEXT 
850 CLS:LOCATE8,10:PRINT"STAGE "А; " CLE 
AR!" 
860 LOCATE10,11:PRINT"BONUS 300*";A 
870 5=5+500*А: А=А+1: IF (S>=U) THENN=N+ 1 』 U= 
U+2000: ВЕЕР 
880 FORI=0TO1000: NEXT 
890 T=Q: РОКЕ 1 , $AA: GOTO180 
900 REM--- BOMB'' --- 
910 PUKE X , ൭8 : FORI-OTO100 
920 OPTIONCMODEO: BEEP 1 : OPT IONCMODE 1: BEEP 
Q: NEXT 
950 NzN-1:IFNGOTO180 
940 REM--- GAME OVER! 
950 FORI=0TO7SS:POKE1 , 1/5: BEEP1: NEXT: РОК 
E1 , ൭൧൧: BEEPO 
960 FORI-8TO12:LOCATEI,190: PRINTSPC (12) : № 
EXT 
970 LOCATE9,12:PRINT"GAME OVER" 
980 IFS>HTHENH=S 
990 LOCATE11,12:PRINT"HI-SC*";H 
1000 PICKK: IFKGOTOAQ 
1010 60701000 
1020 REM LAND MINE (NO. 24) 
1050 REM  (C)(P) К.К SOFT 
1040 REM  MCMLXXXII 7/20 


25 


ріс 
C-BOOOZ 


マイ コン で は すっ か りお な じみ に な っ た 
2 進 法 。 その 2 進 法 の 性 質 を うま く 利 用 し 
た ゲー ム が あっ た . 吉田 光 由 は 「 鹿 効 記 」 
の 中 で , それ を 「 椿 の 目付 け 字 」 と し て 発 
表し て いる 、 今 を さか の ぼる こと 8350 年 前 , 
江戸 時 代 の こと で ある . 


›7 — b D22105 


モー ド 5 以外 , ペー ジ 数 2 に 設定 し て か 
SALT IS ETT RUN の ます 。 
പട്ട്‌, T 万 , Ж, Ж, Ж, Ж 
pr 嬢 , Ж, dE. IE, AA, Ek, 恒 河 沙 , Del 
19%, 那由 他 , 不可 思 議 , 無量 大 数 . それ 
ぞ れ の 文字 が 椿 の 花 ま た は 葉 に 書か が れ て お 
b, その 中 の 文字 を ひと つ だ け 覚 えて も ら 
v, それ が 葉 に ある か 花 に ある か を だ ず ね 
て その 文字 を 当て る ー 一 と いう の が 原作 で . 
す 、 こ こ で は これ を マイ コン 風 に アレ ンジ 


നായാ MC ЛЛ „ы. BASICU R b оз ടാതെ 


18 REM ФФ LEZ せっ て い ee 

28 DIM 9С72,0МС72»хС72,ҮС702 

38 205൮8 518:REM -овоб と か めん 
43 REM ФФ РБ も し “あて お で て ほん ルー チン ee 
58 PLAY "t1280v;/8ode32r6dc16" 

68 FOR 15൧8 TO 144 STEP 24:LINEC 
168, І2-5ТЕРС12,92,1, BF: NEXT 
70 COLOR 2:LOCRHTE B, 14: РРІМТ "あな 
ает uis そら えて くく た ぐ くさい" ; : GOSU 


478 
88 PLAY "て 12BvBoda32rEda16" : ロー ロ 
98 PRINT "ELICA"; СНРФС1262: "22 
&c""::GO0SUB 479 
188 FOR I-8 TO 4:ЕХЕС &H1858 


118 PLAY "t128v8odd32a16":PRINT 
"EOtU* "i 1+1; "® わく BSC yn)" 


128 “THEN 128: IF At<>"y" AND ASL 

:ІҒ AS="y" THEN 0=0+2^ 

LOCATE 10,12-Іж2:РРІМТ B$:6G0 
890: 
МЕХТ 

IF Q=0 OR 0>26 THEN PRINT "? 

ウン ツリ キハ A cS СОТО 


PLAY "112859т588805132ссғ 32e 


27 
120 rbdcrbdee3" 


188 PRINT "その も し は を 
HRS 08,110 9--ലാ; "17739! 

198 GOSUB 478: PLAY - Sem688Bo ടം dd 
efedf8" 

ror PRINT "も し * あて に ちょ う せ ん する て ロン 
218 АФ=ІМКЕҮФ: IF АФ<> "ц" AND R$« 
>"n" THEN 210 

220 GOSUB 480 

230 IF At="n" THEN 58 

248 REM ФФ も し に あて 5൧൨൧൭൨ ルー チン ee 


258 ^ c inae m Qk a rai 0%-СНЕФС2, 


навғо> 

268 FUR І-48 ТО 144 СТЕР 29:LINE 
€ 168, I2-STEPC12, 95, 1, BF: NEXT 

278 FOR Iq TO 8 STEP -1 

288 At="x" : 85-02-21: 16൦ R»-8 THEN 
ñ*$="o": Q=A 


529 LOCATE 18,12-Іж2:РБІМТ АФ: МЕ ||? 


388 PLAY "= 12т9049432ғ64а16ғ64а16 
": EXEC &H1858 

318 GOSUB 480:PRINT “あて て !! 

CPUSH KEY"; 

328 R$-INKEY$:IF R$-"" THEN 328 
338 R-RSCCRH$2:1F R»&H68 THEN R$- 
CHR$CR-8H28» 

348 GOSUB 488:PRINT R$:" て で すね [ロン 


5. MÉRCÓROS Ee 


リー ズ 


Чара (2% 


初め まし て /VoLGUARD- II と 申し ます . 初め て PiO を 買い まし た . | 
の が バカ らし く 思 え を ます. と ころ で , Nakkey さ ん , Tomoko ë A, どう し て あん な に 絵 が うま いん で すか ? 思わ ず フ ァ ン に な っ て し まい まし 
「 い つか 常連 に な っ て 。 Nakkey ふ ん や Tomoko さ ん と 友達 に な る ん だ /」 


@ 7 š š > RL 


L, 文字 は アル ファ ベッ ト , 椿 の 花 と 葉 は 
文字 の 有無 に 変え て いま す . 

まず P6 が 手 本 を 示し て あな た の 決め た 
娘 字 を 当て ます . P6 の 質問 に [Y] > [N] で 


答え て くだ さき さい. この 質問 は 5 回 繰り 返 え 
る れ ま す . そ し て 解答 が 出 た 後 , 文字 当て に 
挑戦 する な ら |[Y|, もう一度 手 本 を 見 た いな 
ら [N| を 押し て くだ さい . 挑 戦 し た 場合 は 女 
字 当 て の 判定 が 出 た 後 で “も うい ち ど や る 


ぜ ゼー っ た い に J だ と 思う . ノ 


nl"; 155 0നാ 01500) ഃ 

358 B$-INKEY$:IF B$<>"y" AND B$« 
259" -1 HEN 3938 

898227 B$=" п" THEN GOSUB 488: GOT 


3780 GOSUB 488: В%-"512т”23о244": C= 
„265 Syd". *x":D$- こ た ぇ は [ "+ ロ 
+ 
727 IF 685503: THEN ВФ-"514т3350об5а 
: CE=" YY hve" 
SB PLAY ВФ:С-2 
ава FOR I=0 TO 8: COLOR C: PRINT С 
$-D$::C-2—C: GOSUB 488: NEXT 
013 PRINT "も うい ちと や る ? [u 
01": : EXEC. &H1858 
ага AE=INKEYS: IF R$4»"y" AND ൧5: 
»"n" THEN 428 
438 IF At="y" THEN 258 
дай SCREEN 1,2: CONSOLE Ө, 16, 1: SC 
REEM 1,1,; 1: CONSOLE 8, 16, 1, 1: CLS 
458 EHD 
469 REM ФФ メッセ ーー し ょ うき ょ SUB ee 
078 IF INKEY$-"" THEN 478 
488 LINECB8, 1595-C1"74, 191), 1, BF: L 
OCRTE Ө, 14 
498 RETURN 
5880 REM ФФ せつ めい ee 
518 SCREEN 2,1,1:С010Р 122,8,1:С 
ONSOLE ,,8,0:С15 
528 LINEC8, ロコ)ーC251, 1915, 3, B 
538 LOCRTE 4, 1: PRINT "wee. 
の HDIL- - +999": COLOR 
540 RESTORE 550:FOR I= 
AD AS: LOCATE 2,1: 
558 DATA "ж 
も し ヾ を " 
568 рата 
か まく ら " 


T 213° +, 
3 Т0 13:РЕ 


PRINT АФ: МЕХТ 
「 め つけ し で , と は あい て の お も っ た 


あて る ケー ム で ヾ あり 、 そ の 
し を た てい に どか の まる と - 
ര്‍ത്ത; 
BOPLET USAT うき を TACT 

ひよ つけ で ん は マイ コン むき に アレ ン シ ド 
90“. DAD そ か が た は その まま て ~ 
dX" PER て ほん を し めし て 、 あな た の 


きけ ヾ Ald 
いわ れ で ばい 


638 DATA も し ~ を あて ます 。 

649 DATA や りか た か が ヾ わか っ た ら 、 PED お も っ た 
も し じい に あて " 

658 DRTR に ちょ う せ ん し て くだ ~ どい 。 


668 PLAY "t72s9m9888l8odagagaaar 
Вад 16g 16ge 16е 163338" 


» 


4 „у 7 TI Гос - T 4 
' pf ` A" N Ж мА” r w i 
ME d d Sr a cu 5 % と М 4 v : K£ АР 110 


感想 は 、 とにかく スゴ イ の 一 言 で す . 


と 開い て きま す . [Y] THUIN, [NT 
文字 当て の と き の 


ゲー ム 終 了 で す 。 WI, 
入力 は 大 文字 で も 小文字 で も 構い ませ ん . 


あど 書き 


な ぜ 5 回 の 質問 に [YIINI で 答え を る だ け で 
ここ で は 書き ませ 


文字 が 当て られ る か は , 


^. 自分 で 考え で (7 だき ちい (も いっ つて を 。 

プロ グラ ム を よく 見 れ ば すでに わか っ て し 

まい ます が … の 。 
表 1 


変数 表 


初期 画面 

P6 の 文字 当て ルー チン 
文字 当て 挑戦 ルー チン 

メッ セー ジ 消 去 サ ブ プルー チン 


670 PLAY AL. 

d Wt re 倒さ m3SaaBga1t1 

5 ロロ REM ee か めん 27<!) ee 

698 SCREEN 3З, 2, 1: COLOR 1,1,2:С15 


700 FOR I-&HEB8O16 TO &HE1F6 STEP 
&H28 


718 FOR J-8 TO 9:POKE 1+7, 146:МЕ 
ХТ: NEXT 
728 LINECB; 052—C175; 115, 3, BF: LINE 
C176: 82—C255, 191), 2; BF 
738 LINECOB, 362-Сс28. 23393 d, BF:LIN 
ЕС159, 352-С174, 1552,2, 
748 FOR I=35 TO 155 STEP 24: LINE 
СӨ, І2-С174,12,2:МЕХТ 

COLOR 4: 


7S8 PRINT "つき の 2170“ ": 
PRINT " by いじ ん ご ぐろ うき“ 

768 COLOR 1: ҒОР 153 TO 13 STEP 2 
ОЕ EY Ө,І:РБІМТ CHRSCSH3S+A 
788 NEXT 

298 FOR І-8 TO ?:RERD XCII,YCID, 
2С12›Ы)С12:ЧЕХТ 

888 рата 222: 48,1,-1,211,75,-1.- 
1s 220, 72,—1, 1, 221,95, 

818 DATA 234,188,-1,1, 176, 143,1, 


-1»,287,145,-1.1,223,168,1,1 
828 FOR I-8 TO ?:PSETCXCIOÓ, YCI22 


838 RESTORE 8680:FÜ0R 758 


TO 
848 READ Я, B:LINE- CXCT う +RrUC I, Y 
CIO *B*UCI22;, 1:NEXT 


858 PRINTCXCIO-*O8*UCIO,YCIO-*B*UCI 

22, 1, 1: NEXT 

868 DATA 4,208, 16, 29,31, 28, 24, 16, 
TO S: РЕА” 4:01, 


е 16e 15aeerB+ ら ご 


14, 8,8, Ø 

870 FOR I=0 

МСІ2,МС12:МЕХТ 

888 DATA 176,48,1,-1, a 46» 1,1, 
വ Зэ) s 207, 121,1, 1, 358, 15 
898 FOR I=80 TO d 

988 RESTORE 938:RERD A, В: РЅЕТСХС. 
I2*R*UCIO,YCIO-*B*UCI22,d 

918 FOR 7-1 TO 19: RERDR; B: LINE-C 
XCIoc-R*UCIO;YCIO*B*UCI22, Q4: NEXT 


320 PRINTCXCIO-*9*UCIO,YCIO49*UCI 
938 рата 4,8,2, 16,8, 18,2, 25,4, 31 


25,48, 39,34 
, 24,42, a ,27,44,19 


6,2,4, 
960 RESTORE 998: RERD 
12 +АжусІә, YCIO-*B*UCI 


978 FOR 1-1 Т0 6: 


いま まで 某社 の 本 を 買っ て いた だ 


(VoLGUARD- 11) 


eio 


CI)), 2, 2: NEXT 
998 DATA 18, 13, 14, 16, 16, 22,24, 26 
, 32. 22, 30, 11,18, 13 

18880 COLOR 3: 


FOR I=8 TO 4:RERD A 
, B: LOCATE ЯА, В: PRINT CHRSCEHSS. I2 
: NEXT 


(JPC-80007 


BASIC+ v УШ 


MINI 
MINI 


РіО '843F. 5 月 号 の PC-8001mk II 用 スー 
バー ミラ クル ・ カ ー レ ー ス を 見 て ,。 ぼく も 
あん な ゲー ム を 作っ て みた いと 思っ て いた 
と ころ , "84 年 9 月 号 に PC-6001 用 逆 ス ク 
ロー ル の プロ グラ ム が 載っ て いた の で , а 
っ そく 作っ で み ま し た .。 KE, モー ド 1, 
ペー ジ 数 2 て で 遊ん で くだ さい 、. 


遊び 方 


ゲー ム が 始ま る と LEVEL を 聞い て きま 
4. そし て , 画面 の 上 か ら こ の LEVEL に 
5 を グラス し た 分 だ け 下 が っ て 自 車 が スタ 
ー ト し ます . あと は 簡単 で , カー ソル ・ キ 
—OD aw) を 使い , 障害 物 を よけれ ば いい 
の で す . 


プロ グラ ム の 説明 


REM ote ote ote ste ote she жж ж жж жж жож жож oe e oe жож жж 


REM x 
REM** MINI MINI CAR RACE 


BY 0. TANABE 1984 


РЕМжжжжжжж ж жжжЖҰЖЖЖЖЖЖЖ Жж 
REM * くさ くし ゃ しょ つか い > жж 
БЕМжж MI SAT OMI NAMI 

REM» ж チュ ウ カ ドッ コ ウ 
РЕМжж ക フネ ン 
РЕМжжжжжжжж ke aie ahe ke ake ape aie aie ahe ж ake 
INPUT" LEVEL”; Y: Y ニ Y+5 

91 6-1 

95 BUSUB2 1909 

188 RESTORE2888 

118 FORI-&HCFOGOTO&HCF 86: RERDR$: Р 
ОКЕІ, VAL" AHN" FAS) : NEXT 
115 НІ=0 


SC=G: CA=3: P ニ ロ : T2080: X=16: し = ロ 
SCREEN1 1, 1: CUNSULE ロ , 16, 6, 6: 
¿COLOR L, 1, 1 

N= " ലല ° A= " ! t i ! } | 


138 0൭8 1990 
REM *MATN x 
GOSUB1948 
058 1590 


GOSUB1348 

ST-STICKC8) 

IF GT= ニ 3THENIX ニ ペ + 1 

IF ST ニア THEN ニ ペー 1 

EXEC&H1 ロ 58 

05812530 

286 IFSC»SSRNDL-B8THENL-71: SOUNDS, 
EC ER RE LS 

218 LOCATEX, Ү: PRINT "х" 

211 TFX<11THENCR= CR-1:PLRY"T168E 


:L—-8 
212 IFX>2gTHENCR= CRh—1:PLRY"T168E 


звв (006 

920 REM ショ キ »*x» , 

1088 FORI-1TO14: LOCATEQ, І: PRINTR 
$;: 


1019 РАТА 12,2,14,5,12,8,14,11,1 
1 


1828 COLOR 3:RESTORE 16848 

1838 FOR I=3 TO 12:RERD R$:LOCRT 
E 2» I: PRINT АФ: МЕХТ 
18q8 DATA "USQPZXR":;"UNYUIT" , "MIKO 


リー ズ 


ミニ ミニ ・ カ ー レ ー ス 


САР РАСЕ 


e 田辺 


BASIC な の で 説明 する 必要 も な いで し ょ 
5. た だ , PiO "84 年 9 月 号 の 逆 え スク ロー ル ・ 
ルー チン は 大 変 助 か り ま し た . どう も あり 
が と う . ФЕ, ЖІ に 変数 表 , 表 2 に 行 番 
号 マ ッ グ を 書き ます . 


あと が き 


書き 忘れ まし た だ が, 音楽 は FiO "84 年 8 月 
号 p.167 の 神田 彰久 氏 の も の を 使わ せ て い 
だ だ きま し ただ, あと, ゲー ム 中 の 左 医 に カ 
ラー の も の が で て くる と 思い ます が , ЙА 
中 の 道路 の 横 の 道 に 車 が 通っ て いる だ け で 


す 。 た だ の か ざり だ と 思っ て くだ さい . 

参考 文献 

1) 石井 英男 : “スー パー ミラ クル ・ カ ー レ 
മ”, РіО, "84 年 5 AF 

2) 神田 彰久 : PiO パ ー ツ ・ ミ ュー ジッ ク "。 

РіО, 84 年 8 月 号 

3) 高橋 徳 安 : “PC-6001 用 スク ロー ル ・ ダ ツウ 


1818 0616, Ө: PRINT" SCORE 8 

HI-SCORE Ө FCAR < a 

1811 LUCRTE2 ロ , 8: PRINTHI: 

15 CONSOLE1; 16, Ø, 8 

RETURN 
REM* * オ ンカ フォ キャ 

1848 ONTGOTO1845,18068 
RESTORE1188: 607101851 
RESTORE1288: 007101851 
EXEC&HCF ロロ 
READHS; ВФ, C$ 


IFH$-"E"THENRETURN 
൧9൨5, B$, C$: 80090 

28 81 1 2 120502. 000032. bd 
DATAt 1200 120992. 90 1277൭8 


DATAt 12120052. ddc 1 
DRTRodg2. к ерін 
реле кета 
DRTRodo3bi1li2bagodf-tedef-*g 
DRTRoSe2l112defgabb2b8a2.. 
DATAode2l 12defefgg2g8f+2.. 
DATAodgid2d1 
DATAE, E, E 
РЕМжж മധ്‌ 
FURI= ニ 1TUINTCSC ン 1 ロロ ) 
S-INTCRNDC12*925-411 
U-INTCRNDC12*82-41 
LOCRTES; 1: PRINTNS 
IFU-QORU-STHEN13"78 
NEXT : RETURN 

8 REM * あ た っ た か * ャ 
P-SCREENCX;Y2 


1250 4 

GRBDC": CA=CA-1: 58 

1251 LOCATE39; Ө: PRINTCR:; 
1268 IFCR= ロ THEN 129 ロ 
1278 RETURN 

1288 REM**GRME HUER** 
1298 ロー ロ : CULOR9: _ОСАТЕ 11,8: PRINT 
"GRME ОСЕР 

1388 FORÍ-OTO1588:NEXT 
1318 80532199 

1315 80701568 

1348 РЕМ* ж)“ zy x 


жж 


FP-RSCC'O"JTHENPLRY"T2S804. 


EBF BASIC リ スト 


പിച്‌ " s "Ç ZHNJI " 
1858 DATA "MENOUTUN", 
BFUJ","RGNZUC" 


1868 DATA "QURSIUC";, "OMGKEY " 
18780 SCREEN ; 2, 2: RETURN 


"FGLUD", "SOK 


ハン ドル さば きも 軽やか に 。 


SCORE  14B:HI-SCORE 


スー イス イ … 


84 年 9 月 号 
表 1 変数 表 


>” PG, 


ハイ ・ ス コア 
スコ ア 
自分 の 車 の 数 
障害 物 
画面 用 

音楽 


衝突 ルー チン 
GAME OVER 


スク ロー ル ・ デ ー タ 
説明 


・ カ ー レ ー ス BASIC リス ҺАН SS 


1358 EXEC&HCF 88: LOCATEB, 1: PRINTA 
$::5C-SC-5: LOCRTE6; B: PRINTSC 
1351 IFSC»HITHENHI-SC:LOCRTE28,; B 
: PRINTHI: 
1368 RETURN 
1378 РЕМжж YH жж 
1398 Q-INTCRNDC12*55243 
1395 IFU-QTHEN1418 
1400 LOCATEQ, 1: COLORINTCRNDC1)*4 
2+1: PRINT" ":GOTO1428 
1418 LOCATEQ+21, 1: COLORINTCRNDC1 
J*4) +1: PRINT" 
1428 COLOR1, 1, 1: RETURN 
2000 DATA21, 82: 18, са, аз, 
2188 SCREENd, 2,2: 
2118 PRINT: PRINT" 
CAR RACE 
2128 PRINT: PRINT: PRINT" 
OSAMU. TANABE 1984 
2130 PRINT: PRINT" 
の セリ メイ 
2135 PRINT: PRINT* | 
ニュ ウリ ョ フ し て Ts 
2140 PRINT" 
ച്‌ ധം 
2146 РРІМТ:РРІМТ" SCORE 7:66” 
HI-SCORE ":HI:" "3 
ദ Р: PRINT" <— 
[ 1417 


PRINT:PRINT" 
BAR 1 


2165 IFG-BTHEN2198 

2178 IFSTRIGCB) う =1THENSCREEN1, 1, 1 
: RETURN 

2188 GOTO2178 


2198 IFSTRIGCB)=1THENG ロ = 1 : GOTO128 
2288 80702199 


た た い 


カー ソル ・ キ ー で ヾ ロロ を 4 


SP 


мо 
( ノ PC-B0O0 シ リー ズ 


N-BASIC 


ミサ イル eg ボー ル 
I exu 


ミサ イル を 格納 する と , 障害 物 も 増え る … 


最前 線 で 戦っ て いる 味方 か ら , ミサ イル そこ で まず , [416 キー で 発射 台 を 左右 
を 送っ て くれ と 頼ま れ ま し た , そこ で , で に 動か し , ちょ うど いい 場所 で | SPACE | + く な っ て いき ます . 

きる だ け 多 く の ミ サイ ル を 爆発 させ な いよ ー を 押し て くだ きい . する と , ミサ イル が * 発 | 
うに 補給 し て あげ て くだ さい 、. 射る され ま す . プロ グラ ム の 説明 


この ミサ イル は どん どん 進ん で いく の で 
[4][6] キー て 誘導 し て ボー ル み だ いな 物体 や 
障害 物 СЕНСЕ: 格納 庫 の まわ り も 同じ ) 
に ぶつ か ら な いよ うに , 下 の 格 納 庫 の 中 に 
入れ て くだ さい . 

を そして, 5 つの 格納 庫 に ミサ イル を すべ で 


遊び 万 


ブ プログラム を RUN する と , 画面 上 部 に 
ミサ イル の 発射 台 が , そし て 下 の 方 に 味方 


ォ ー ル BASIC TT. し か も あま り だ い 
し だ た こと は や っ て いま せん . ブロ グラ ム は 
それ ほど 見 に くく は し て いな い の で , 各自 
解析 し て みて くだ る さい. 


の ミサ イル 格納 庫 が 表示 る れ , その 間 を だ て 入れ る と ボー ナス 点 に な っ て 次 の 面 へ と gis, ミサ イル が ボー ル に 当 だ っ た だ か: E 
くさ ん の ボー ル の よう な 物体 が 左右 に 動い 進み ます . この と き , ミサ イル の 発射 台 の う ヵ の 判断 は , ミサ イル を 動か し だ と き と 


近く の 障害 物 が 多く (なり, だ ん だ ん と 難し ボー ル が 動い の だ と き の 2 回 や っ て いま す . 


TAVEW. 


450 5=5+10:Е=Е+1: IFE く 5THEN2 の の 

460 FORI=STOS+100STEF10: BEEP1 

470 5=1: 560508200: FORT-OTO20: NEXT 

480 BEEPO:NEXT:C-C*1 

490 IFCMODS-OTHENM-M-i1 

500 ҒОКІ=0т058:11МЕ (1,0) ~ (1,25) ," ":NEXT 
: 6070120 

510 РОКІ =0т05: COLORIMOD2+1 

520 LOCATEX,Y: РКІМТСНКФ (143+ (IMOD2) #97) 
530 FORT=0TOSO: ВЕЕР 1 : ВЕЕР@: NEXTT 。 І 

540 IFPZ236THENMID$(4a$((Y-100)/4) ,Х-1, 35) = 


100 WIDTH40 , 25: СОМОГ ЕО, 25,0, 1 

110 S-0:M-2:C-71 

120 ҒОКІ=0Тт02:А$% (І) =" ": FORJ=QTO6: A$ (І) =A . 
Ф (1) +"@ "sNEXTJ 。 1 

130 COLOR1 ,32,0:PRINTCHRS (12) 

140 COLORS: LOCATE31 , ടം PRINT "SCORE" 

150 COLOR6:LOCATEZO, 10: PRINT"MISSILE" 220 IFINP (9) =191ANDD=QTHEND=1sX1=X:LOCAT 
160 COLOR4:LOCATE31 ,15:PRINT"ACT" EX—-1,2: PRINT" 1 |" 

170 X-215:X1-2X:E-0:FORI-29TOZX8STEP9:LINE: 330 XX-0:YY-0: OND-1G0T0370, 350 

0,0) —(I1,22) ,"B",1,B:NEXT 240 IFINKEY$=CHR$ (13) THEN110ELSE290 

180 FORI-STO2SSTEPS:LOCATEI,22:PRINT" ": 250 60508590: IFFP=2 さ 6THEN5 1 の 

NEXT 360 POKE&HF302-4X*24Y*120,32 


280 COLORS:LOCATEX,2: PRINT" ¥" 

290 COLOR7:FORI-QTO2:LOCATE1,10-*I*4: PRIN 
ТА%(1) 

300 A-1:B-1: IF IMOD2Z=0THENB=27ELSEA=27 
210 АФ (1) =RIGHTS$ (АФ (1) ,ഥാ +LEFT$¥ (A$ (І) ,B) 
:NEXT 


190 LINE (8,23) - (88,23) ,"7",1 
200 COLOR1:FORI-STO7:FORJ-QTO1 


210 R=RND (1) #29: LOCATER, І: PRINT"B":NEXTJ 


I 

, 

220 X2X1:Y22:D-0 

250 COULOR7』 LOCATE さ 2.。 7: GBDSUB6 の の 


240 LOCATE34,12: PRINTM: ОСАТЕЗ4,17:РКІМТ 


C 

250 ІҒХ<2ТНЕМХ-2Е( БЕІҒХ>27ТНЕМХ-27 
260 COLOR6: LOCATEX-1, 1: PRINT " bell" 
270 COLOR7:LOCATEX-1 ,2: PRINT" L 3" 


370 
380 
390 
А " 

400 
410 
420 
LSE 
430 
440 
Q:F 


IFINP (0) =191ТНЕМХХ= 1 

ІҒІМР (0) =239THENXX=-1 
IFD-OTHENXX-ZXX*2:LINE(X-1,1)—(X*1,2) 
",аВғ 

X=X+XX: IFD=ØTHEN25Ø 

ВЕЕР 1: Y=Y+1: 60SUB590: BEEPQ 
IFP232THENCOLORS: LOCATEX , Ys PRINT"*"E 
510 

ІҒҮ<22ТНЕМ290 
ҒОКІ-0Т02:ВЕЕРІ:ҒОКТ-0Т020: NEXT: BEEF 
ORT-OTO2Q0: NEXTT , І 


60 COLOR6:LOCATEB,8:PRINT"«« 


M=M- 1: IFM>0THEN220 
GAME OVER 


COLOR7:LOCATE35,12: PRINT"Q" 

р=2: 6070290 

Р=РЕЕК (НЕ202+Хж2+үж1 20) : RETURN 
S$=RIGHT$ (5ТКФ (5) 1 ЕМ (ТКФ (5) ) ~ 1) 
COLOR7: _ОСАТЕЗ і , 7: PRINTRIGHTS ( "0000" 
S) : RETURN 


РМ- 7 


BASIC 


Q 


せっ か く 始 まっ た 試験 休み . た だ テー プ 
を セッ ト し て ロー ド す る だ け で は も っ た い 
な い の で , 自分 で 作っ て みよ うと 考え て こ 
の ゲー ム が 出来 た わけ で す . 

ҰБ, この ゲー ム は 単純 で し か も オー ル 
BASIC で す . し か し 結構 面白 いも ん で す . 
や っ て みる と . ひま な と き に 入力 し て 遊ん 
で みて くだ さい . 


遊び 方 


フ プログ ラム を RUN すると, ダイ トル が 
表示 きれ る の で 何 か キ ー を 押し て くだ る さい. 


ゲー ム が すでに 始ま り 。 
sist 


画面 上 部 で 左 か ら 
“Б” が 走っ て いき ます . 
ZIT, タイ ミン グ よ く 画 面 下部 の 砲台 


グッ ド ・ タ イミ ング / 調子 いい ぞ 


т 


“АНЫ” DO [SPACE] キー で ビー ム を 発 
射 し て くだ さい . 制限 時 間 内 に 1 発 も 当 た 
ら な いと ゲー ム ・ オ ー バ ボー, そう で な けれ 
ば 次 の 面 へ と 進み ます . 

"b. の 動く スピ ー ド は , 面 ク リア ご と に 
速く な り ,。 4 面 で は 赤い キャ ラク タ に な り 5 
ます (別に これ が 赤い 彗星 ど と は 言わ な い 
けれ ど …). そ し て また 1 面目 に 戻り ます . 


最後 に 


FM-7 を 入手 し て か が ら 半 年 た ち ま し だ が , 
ぃ いま だ に 、BASIC は 生か が かじ り だ し , 
語 は さき っ ぱり で す .。 ナイ ュ コン 時 代 に 思っ て 
いた よう に は な か な か いか な いこ と が よく 
わかり まし だ 】 


マシ ン 


見 待ち ます . 


HOE 
л, 


より は まし だ ろ /」 だ っ て 。 


P 最近 。 パソ コン の 自慢 を する 人 が 増え て いま す が , 聞い て いる 方 に と っ て は 頭 に きま ます ね . あー だ 、 こ ーー だ と ぬか し だ た あげく. た だ た ま に は 触 
らし て や る か ら よ .// な ん て いわ れる と 。 む し ょ うに 腹 が 立つ と 思い ませ ん か ? 仕方 な く !?「 そ ん な の すでに 落ち 目 に な る よ 」 と いう と ,「 君 の 
くそ 一 , マシ ン の 良し 悪し は 本 人 が 決め る こと で あっ て , 他人 が と や か くい うこ と で は な いと 思う の で す が . & 


(JUFC の 新手 の 46 番 手 か つえ さん 好き ~) 


PIO 


തെരാ 市 ベー ダー BASIC! Z F 


ү — 
DEF INTA-Z:WIDTH40, 20 

CLS 

SYMBOL (200, 20) , "^" -7° -",4,4,7 
LOCATE9,7:PRINT"& INVADER" 
LOCATE7 , 14: PRINT" ——h." 


LOCATE7,15:PRINT"ISPACE! === TRRIGER 


KEY" 

80 LOCATE7,16:s PRINT" a! 

90 LOCATE12,19:PRINT"PUSH ANY КЕҮ" 
А%-ІМКЕҮ% 
IF А%-"" THEN GOTO 100 
° Ke XC (CC E 3C 3€ ЗЕ 3€ УЕ Je 3€ 9€ 3€ 9€ € 9€ € 3€ € 3€ 3€ - € 9€ 
SC=Q: К=4: FA=1 
"жижа LaT са!) 2 x**** 
CLS: COLOR7 
PLAY"V1SL16CGDFEGDF" 
FLAY"V1SL16CGDFEGDF" 


LOCATE15,10:PRINT"FASE "; ҒА: ҒРА=ҒА+1 


PLAY"V15L 16DAEBFAEG" 

FLAY"V15L 16CBDFEGDF " 

CLS 

RANDOMIZE TIME/4 

FOR I=0 TO 300 
E-INT (RND (1) *6 さ の ) 
W=INT (RND( 1 ) *19 の ) 
=INT (RND (1) #6) +1 
PSET(E,W,S) 

NEXT 

М0: Е=0: TIM-Q: メニ の 

COLORS 


510 LOCATE17,18: PRINT" АРЫ" 


(FA-1)MOD4-Q0 THEN COLOR2 ELSE COL 


LOCATE Х,2: РКІМТ "ж" 

‘HHHH キー ニュ ウリ ヨク の **** 

АФ=ІМКЕҮФ 

IF A$-" " THEN 60508 830 

XH EL АРКО жын 

IF F-Q0 THENGOTO 440 

LOCATE 18,BY:PRINT" " 

BY-BY-1 

IF ВҮ<0 THEN F-Q ELSE 430 

GOTO 440 

LOCATE 18,BY:FRINT"e" 

‘HHH イト "の жы 

IF(TIM MOD R)<>@ THEN GOTO 510 

LOCATE Х,2:РКІМТ" " 

X=X+1 

IF Х<4@ THEN GOTO 500 

х=@ 

LOCATE X,2:PRINT"#" 

“жж メイ チュ リウ の +++ 

IF ВҮ<>2 THEN GOTO 670 

IF Х<>18 THEN GOTO 670 

പ)... "UV1S5L2bE", "V19SL. 26" 

FOR I=@ TO 20 

COLOR= (7,2) 
FOR C=1 TO 7 
COLOR= (C, 5) 
COLORS= (C,C) 

COLOR= (7,7) 


NEXT C 
NEXT 1 
LOCATE1S, 10:PRINT" 
LOCATEX,2:PRINT" " 
F = の 』 X=@:N=N+1:BY=0@ 
ലം TAL жжжж 
IF TIM=830 THEN 60Т070 
TIM=TIM+1 
GOTO340 
SC=SC+N#1 0# (S-R) 
IFN-Q THEN 6070770 
PRINT "トワ テテ "iN*1Q0*(S-R) 
FOR I-0 701000: МЕХТ 
R-R-1 
IFR=@ THEN К-4 
6070140 
PRINT "スコ ア TISL 
LOCATE17,10: PRINT" オ シマ 4" 
IF SC>HS THEN HS-SC 
(ОСАТЕ17,11:РКІМТ"УМ 227 "പട 
ҒОКІ-й0 Т08000:МЕХТ 
GOTO 30 
“жж 9727 жж 
IF F=1 THEN GOTO880 
F=1:BY=17 
FORI=0TO3O: BEEF і: BEEPO: NEXT 
LOCATE 18,BY:PRINT"@" 
RETURN 


PC-8000 シ リー ズ 


N-BASIC 十 (マシ ン 語 ) 


アス テロ イド ・ フ ァ イ タ ー 


ASTEROID FIGHTER 


こん に ち は . 私 は 人 呼ん で “BAEK” 
TT. SAH, РіО 84 年 10 月 号 に 載っ て い 
た バン ソ ピア 用 ASTEROID FIGHTER を 移植 
し て み ま し た -. | 

な お , 単純 な 移植 で は PiO に 載ら な いと 
思い (?), 逆 スク ロー ル は マシ ン 語 で や っ 
TAST. 


ARDE 23 


入力 方 法 は … い いで す よ ね 。 と いい だ い 
と ころ で す が 。 550 行 の DATA 文 だ け は 気 
を 付け て 入力 し て くだ さい 、. 

を し て , 入力 し 終わ っ た だ たら RUN する 前 
5 が セー ズ し て 生き まし 2 ൨. まま の 
セー ブ す る クセ を 身 に 付け て な お きる えす れ 


@ 移植 屋 K 


SIUE 


SU 718014), テン ・ キー の 
[4|[e| キー で “ക” ( 自 機 ) を 左右 に 動か し て , 
“О” (RK) に ぶつ か ら な いよ うに “$” 

(43$) を 取っ て くだ さい . 


回 ダダ タム だ る で 


の で , マシ ン 語 を 使っ て いま す . 


逆 ス クロ ー ル は BASIC だ け で は 無理 な 


この ルー 


жуа, た だ 単に V-RAM の ブロ ッ ク 転 送 


を 行なっ て いる だ け で す . 


Жі, キー 入力 


は INP 関 数 で 直接 I/O ポ ー ト より 読み 込ん 
пай 00: Ti 


AE 


移植 どっ て な か な か 大 変 な ん で す よ 。 © 


くら 6 元 の ブログ ラム が オォ オール BASIC だ と 
言っ た っ て , 移植 し た 方 も オー ル BASIC で 


ある と は か ぎら な いん で す . 


ക്‌ A 


あと は 運 を 天 に 任せ る だ け だ よー 


の PC で は ハー ド ・ ス クロ ー ル な ど で き な 
oL, か と いっ て BASIC で 逆 ス クロ ー ル 
きせ た だ た ら 遅 く て と て も ゲー ム に は な ら だ な い 
ne ag 

仕方 が な いか ら , この 部 分 だけ は マシ ン 
語 を 使っ た ん で す . その 苦労 わか っ て くれ 
iv? (と は いっ て も , この 程度 の サブ プル 
ー チ ン ぐ らい な ら 前 に 作っ で あっ た と いう 
MELDT) 


[КАЕ A DI DANT T SEE 
と 役に立っ て くれ る は ず で す .。 i 


ലാലാല 260 PRINT CHR$(12) 410 

‘ж ASTEROID FIGHTER N-basic ж 270 LOCATE X,Y: COLOR4: PRINT"4": COLOR7 420 FOR IX=0 TO 200: ВЕЕР 1:BEEPO: NEXT 
ലലലാ 280 ' 420 GOTO 190 

3 290 M=USR (1) s LOCATE 0,1:РКІМТ SFACE* ま (4 の ) 440 FOR 1X= の TO 30: BEEF 1 : BEEFO: NEXT 

; 450 SC=SC+10 

500 LOCATE ІМТ (КМр (1) #54) +1, 1: COLORS: РКІ 460 GOTO 290 

NT"$";: COLOR7 470 FRINT CHR$(12):F-1:YzY-2: X-20: LOCATE 
160 WIDTH 40, 25: СОМЅОЕ, ,0, 1 510 FOR Ісі ТО 4:1 ОСАТЕ ІМТ (RND (1) * さ 4 ) +1 10,10: РКІМТ "FIRST STARGE CLEAR!" 

170 DEFINT А-2 slsPRINT "O"; : МЕХТ 480 FOR IX=@ ТО 4000:NEXT:GOTO 260 

180 DEFUSR=&HE の の の 320 К-ІМР(0):7-(К-1910ж(Х<24)-(К-259) (X 490 PRINT СНН%(12):Ғ-2:Ү-Ү-2:Х-20:1.ОСАТЕ 
190 PRINT CHR ま (12) >1) 10,10:РКІМТ "SECOND STARGE CLEAR!" 

200 LOCATE 10,10: COLOR2: PRINT "ASTEROID 520 LOCATE X,Y*1:PRINT " 500 LOCATE 12,12:PRINT "LAST STARGE STAR 


CLEAR 200, XHDFFF 
FOR = の TO 11:READ DT$:FOKE *HEQQQ+ñ 
s VAL ("&H"+DT$) : NEXT 


; ";:Х=Х+7 
FIGHTER" 340 8=PEEK(&HF さ の 2+Yw12 の +X テ 2 ) Te 


210 LOCATE 15,18:COLORS:FRINT "HIT RETUR. || 250 LOCATE X,Y:COLOR4:PRINT "4";:COLOR7 510 FOR IX= の TO 4000: МЕХТ: БОТО 260 

N KEY!" 260 IF 5-227 THEN 420 ELSE IF 5-26 THEN 520 ' 

220 LOCATE 2മ, 22:COLOR7:PRINT "5СОБЕ:";5 || 440 520 'scroll pro. 

G 370 SC=SC+F+1 540 ° 

230 A$-INKEY$:IF A$«5»CHR$(12) THEN 220 380 IF (5С>200) AND (F= の ) THEN 470 550 DATA 21,3f,fe,11,b7,fe6,01,c8,0a,ed,b 
240 290 IF (SC>1000)AND(F=1) THEN 490 8,с9 

250 5С-0:ғҒ-0:Х-20:Ү-20 GOTO 290 


gio 


MS 


GAL GANON 


CN だ な うど レレ は で うた 
…」 購 の 乗っ た ステ ラ ・ ギ ャ ン バ ー は , 時 
空間 を 和 飛び 超え ,。 ガル ギャ ノン 星 へ と 迷い 
込ん で し まっ た . ここ で は , 地下 に は ボー 
FAN, 地上 に は ビラ ミッ ド 型 (プラ イマ 
ティ ッ ク ) の マシ ン が あり , ALTRAS 
じ 地 上 50m を スペ ン サ ー と いう 空中 戦 用 マ 
シン が 飛ん で いる 

Ss, 戦い の 始ま り だ ノノ 


BUJ 


RUN す る と デモ 画面 が 表示 きれ, 何 か キ 
ー を 押す と ゲー ム が 始ま り ま す . 自 機 の 操 


9929999 


൮൭൪ 


22339993 
190 


9osub 50500 

Print "Д8" 

240 9osub $SET 

SCz0: SHz3:ROz1:MAXs5 

260 Xz1800:V2108:C0Uz0 

HH$ ま ="ff818181818181ff" 

271 color 0,%С0:со1о0ғ 532, &С0 
9osub $ROLL 

` locate 3,QiPrint 
THE RERL BUTTL cursor (2; 1); 
"HI 5СОКЕ:":НІ5С:суғвоғ(18,10 
"BY:"SNISCS 

500 locate 22500൦10 "ROUND : 
:РЕ0:сиғсоғ(20.2)! " SHIP:":SH 

510 loc д to Х,У 


‘console 0,0 


1",MU$*"oScdef2fedd8r8d8d8el1" 
330 9osub $ROLL 

340 if Play then Joto 520 

359 locate 2:30 101 
SC 
569 
379 
38a 
590 
400 
410 
422 


Птіпкеу(сй; 
if 950 then goto %0К 
1f( 昌 =54) CX>g) う then Х=Х-5 


1f〈(H=51)*C(V>9)then "= ヤー5 


if 


RBR=%$ then Joto ま HHN 


10660'293999399999993992999232229 


112928 GALGANON THE REALE BUT 


TLE 939 
129!333 CRERTED BY 
999 
1381939 USS も と た けし 
999 
198949൭൪ СОВІРІМ HIS 
C) ൭൭9 
16992൭ FOR SORD т.5 BASIC-G 


180'299999999929992399299233929923329 
clearidim (രാന. 


HISC=1999:HISC$="SORD т.5" 
М0%= "+25018": МОі $= "1250120 


"GRLGRNON 


320 Play MU$*"o3cdef2fedd8r848 
d8ei1",MU$*"od4cdef2fedd8r8d34d8e 


"SCORE :. 


1f(H=55)*(X く 255)then X=X+5 


і#<й=46) ж(Ү<190) +ћһеп Y=Y+5 


b 編集 部 の 皆さん 聞い て くだ さい . 
民 と いわ れる ん で す . 
きる ん て と て も や る しく て ハン サム な 人 で す . 
っ て も ら う た だ ため に ) / で も 。 ATR, оок 


ガル ギャ ノン 


09152 BI sË 


作 は カー ソル ・ キ ー ゼ 移動 , [| キー で 地上 
また は 地下 マシ ン の 攻撃 ,[X| キー で 敵 ミ サ 
イル まだ た は スペ ン サ ー 攻 撃 で す . 
な お 照準 は 何 か を 見 つけ る と 音 を 出し て 
逃げ きれ る だ ろう か , それ と も … 


430 1+( 日 = ミ 34)*(SF=g>)then SFs1:! 
oc 5 to Х,У: моче 5 to Х.8.2:Р1 
ат” өзееее” 

440 move д to Х,У,1: 
, リー マ 9 

459$0К 

460 9osub $ROLL 
470 15൧10൦0114 
DFzRi:scol !»;rndl115*2:P!a9 М 

01%%"обсе" else DF=9 

488 П82-ссоіпс<(520:1% 日 2 く <>ー1 then 
goto を HAN 

490 if coinc(8»4»5-1 then Joto 
%В0М 
500 


hac T. 3 r 


Я1<>-1 then 


if COU>MHX then Soto $PO 

510 if SF=1 then if status(5)= 

0 then loc 5 to-199,-199! SF=9 

528$TEKI 

530 TVsTV*1:if TY>190 then TVs 

0:scod 5,12:ТХ=ғп 255) : =со1 5 
‚2:51 =9 

540 loc 3 to TX.TV 

558 if status〈2)= り 9 then loc 2 

to Fnhd〈259).gimoue 2 to rnd«25 

5»,i90,5:scod 2,8:52=0 

560 if status〈4)=9 then loc 4 

to rndc250»5,0:move 4 to rnd〈25 
52,190,ғп4552%1:5со024 4,24:Р1Тау 
М01%8%"05ҰЯҒғйа4":655-й0 

570 if 5131൮50658 then loc 6 
to sPrite(45;1»5.sPrite(4,0)5:mov 
e 6 to X,V,rnd(3»*2:Play MU1$+ 
"oSedc" 

580 if status(7)=% then loc 7 
to sPrite(3;105,sPritec(3,05:mov 
e.7 to Х,Ү,гпӣ (35) +2:Рр1 ау 11154 
"oScce" 

590 goto 3690 

600$HRN 

618 05൭5010൦01) 

620 if Я5<1 or RS»3 then Joto 
439 
620 
50:5со0д4 2,20:52ш1:р1ау MU$*"o3 
eed":COUsCOU*1:90to 550 

648 if 日 S5=3)*(S1=9)then SC=SC+ 
さく 99iscol 35,15:51=1:Рр1ау MU$-*"o 
3ede"iCOU=CDU+1i9oto 350 


1fCHS=2)*(52=9)then SC=SC+ 


" 


実は , 僕 り ・ り ・F・C に 入っ た ん で す . そこ まで は いい ん で す が , 
weta AEE CN RE hy dpi КОШИ Ran йл Бы 


色 が 変わ る の で , TF ОНЕР F сін Z U 
れ ば 地下 マシ ン を 見 付け た と いう こと で す . 
[ZI| キ ー で や っ つけ て くだ さい. 


プロ グラ ム に つい で 


M5 に は Stchr と いう 命令 が ある の で 
同じ パタ ー ン な ら , その デー タ を 回 転 き せ 
れ ば スク ロー ル し て いる よう に 見 えま す . 

今度 は Repeat 一 Until を 使っ た ハイ ラン 
ク な も の を 考え て いま す . 


行 番号 マッ プ 


REM 

初期 設定 を デモ 

ゲー ム 画 面 & ネ タイ トル ・ ミ ュー ジッ ク 
自分 ルー チン 

8. — >+ > 

自分 用 判定 ルー チン 


ラウ ンド ・ ク リア 用 ルー チン 
エン ディ ング 処理 

. 自分 爆発 ルー チン 

キャ ラク タ ・ セ ッ ト 
デモ 用 ルー チン 

スク ロー ル 用 ルー チン 

カラ ー チ ェ ン ジ ・ ル ー チ ン 


GALGANON BASIC A b ക്ലാരയെ 


678 Joto 4350 

589$HHN1 

690 5S=Coin こ (5) 

691 if 59 then Joto 56а 

TOQ if 9554 and 53508 then SC=S 
C-*50:scod 4,20:Plau "12551905 
с":Сс0У-С01%1:55-1 

701 if В5>5 then 5С-5С%5:р! ау 
"t25518o3c":l1oc RS %0-1й00.-100 
782 loc 5 to-100,-100:SFz0 

710 9oto 358 

720$RO0 

730 9osub $CHRNGE 

?40'for 152 to 12:10с I +0-100 
, -1 0 
750 next:TY=191 

760 locate 5;,180:Print 
R THIS ROUND''" 

770 Play MU$-*"o3ccdeccdeccdecc 
de".MU$*"o4eededdedeededded".M 
U$*"o5cccc2c8r8c8c2c8r8c8" 

780 if Play then 9oto 780 

790 MaxXsMAX«3:COUZOÓ0 

800 SC-SC*100:ROZRO*1 

818 locate 5.,1080:Print "Wm" 

820 9oto 290 

850%ЕМ 

840 59 3.75.15 

858 for 158 to 1800 

868 9osub $ROLL 

870 sg 2.,1510:2$-inkevs$ 

8880 -пех?: =9 5,,0:59 25:50 

890 for IsOÓ $0 12!loc | も の = 100 
;-100:next':cls 

900 д%-"00000000000й00000":4о50 
b $ROLL 

920 locate 5;,10:Print 
ERS 

930 if SC>HISC then 1115055030 
int " VOU GOT HISCORE! "sinPut 
" NAME : "3HISC$:P]1 ау MU$-*"oScc 
деіғ8Я2".МІ)%8%"о4у19ссдессдесс" 
940 locate 351550൦101 "YOUR SC 
ORE :":SC:cursor(3;162 5 "ROUND 
:s":RÜ:cursorC35,; 17» 5 " HI-SCORE:" 
*HISC:cursor(3,1825: "BV :"*HISC 
% 
950 


"ОК CLER 


"GAME OU 


locate 3$,2:Print "HIT ANY 


JR を 持っ て いな い の で 快 人 きん に 非 国 
P.S. 話 は 変わ っ て 。 WIAA 
。 だ か ら PiO に 載せ て あげ て くだ きい (も っ と お ご 
(ERREF ATLA) 


Ж 


WF ) 
қ ക്‌ം 


ue 


KEV!" 
9680 9ഠടധാ $CHRNGE 
978 9osub $ROLL 
988 RDishHDi-*i:if 
“80150:9ഠഠ 960 
990 if inkey$z"" 
1000 Joto 22а 
1010$ 860M 

1920 Н5=со1псс@› 
t030 if AS=5 then 
1048 s9 2.199,15 
1050 for 158 to 1800:0ut %20,1 
1060 out %21,1/2:Ьсо01 ൦001: 
next 

1878 out &20,&FF:bcol:s9 2, ,0 
1980 for 150 to 12:10с I to-19 
й. - 108: пех? 

1098 SHzSH-1:if SH< then 9oto 
ЗЕН 

1108 TY=191 

1118 9oto 268 

11205567 

1138 data 010101801818д212227.2е? 


80171989 then 


then Joto 970 


goto 560 


^ 


“7016853848: 
1140 data #98313181091090900 #58, {82 
00001818181 +#0,09+#81313130009901: ¢ 
>119999898181819f† 
1150 data 552a150a05020100,.012 
2959a152a5599,55ab5Zaf5fbfefff 
> アイ fb+5faf5Z5b5599 
1169 data е?а5%595%7001515.151 


,%62сейдйсд0д000090 
1170 data 9999999999949291.919 
2040000000000, 9030309000224989 
» 89949299999999999 
1190 data 81c3e6bfd938311b,9f け 9g 


9f9f③f アイ こと f す 9C9.898989898989c4e4・ 


43b 9999999999.4464544C449ec8c 


fleJe?ft371e80c.8143e6f£ceS8c83íctfe 
‚5 #160с+#39сӣедбӣе 

1190 data й010554743921657%.242 
5#11935+#2010400, 9900 #3 #с983ес?7+#с 
:»fcc8879t75acaaaa 

1200 restore 

1210 for 158 to 27 

1220 read A$ 

1238 gt: chr. ൫8.൯൭. 1 

1240 next 
1258 scod 
1268 scod 
1278 sc と od 
1280 scod 
1298 scod 
1500 s こ od 
1518 scod 
13280 scod 
1338 scod. 
13480 таз 2 
1358 return 

1368$DEMO 

1378 Print "RAS" 

1580 locate 3.0:Print."GRLGANO 
"3 CUFSOr(2.2) 3 "VOU ARE THE PI 

LOT ОҒ STERA GYRMBER.":cursort 

2,35); "PLEASE DEFENCE YOUR EART 

Иш” 

13980 locate 59500൦10 "ВЕ НАРР 

Y GOOD LUCK'":cursort5; 55 * "HI 

SCORE: ":HISC:cursor(7?75,62 : "BV 

"S HISC$ 

1488 locate 3,10:Print "HIT AN 

Y KEV TO PLRV":Plag MU1$-4"o6cd 


9, 11 
1,15 
2:9 


ð., ð: scol 
1»4:sco! 
2:8: scol 
53512:<с01 
4.24:<с01 
5.16:scol 
6,16:5с01 
7»16:5с01 
8,20: sco] 


1412 if Play then 9oto 1410 
1420 locate B; 10:Print "W":sle 
ер 1:18 


GALGANON BASIC リ スト 


111438 00=00+1:1# 
o 1458 
1440 1% inkey$="" then Joto 14 
88 else QUzO:return 
1458 Print "URSN":0U-0 
1462 9osub まじ HHNGE 
1470 locate 9.10:Print "GRLGRN 
ON":cursort5.15:"HIT ANY KEV": 


DU>5 then Jot 


cursor(S:2):"PLAYING DEMO NOW! 


1480 905095 $ROLL 

1498 0/-0у%1:1% 01088 then 0 
Uz0:9oto $DEMO 
15800 if іпкече<»"" 
eturn 

1518 goto 1480 
1520$ROLL 

1538 日 =r19ht ま (日 $ ま ,2) 

1548 日 ま =B$+! ef も t ま (日 ま ,14) 

1558 stchr A$ to 80,1 

1560 stcChr AS to 32,1 

1570 return 

1588$CHONGE 

1590 日 ま ="" 

1699 for Ісі to 16 

1618 R*$=R$+rig9ht$(hex$ú(rnd((16) 
2.10 

1620 next:SH=9 

1658 COz-2valí"&£&"*riSght$(C(hex$irn 
0011421248) 

1640 it CO=3 or С0=5 or CO0s? о 
r С0=8 or CO=9 or CO=19 or CO= 
11 then 3oto 1620 

1658 color 8,CO0:color 32500 
1660 return 


then 0/5: 


88 BASIC 


エ 学 社 か ら 仕事 を 頼ま れ た お れ は , 1/О 
星雲 に ある PiO 星 に 向かう こと に な っ た . 
この PiO 星 の 周辺 は 空間 が ね じ れ て いて , 
と ん で も な い 場 所 へ と ワー プ す る こと が あ 
U, 船乗り た ち に 恐れ られ て いる 場所 だ っ 
f. し か し , お れ は 480 円 と いう 大 金 に つら 
れ て 引き 受け て し まっ た . 

出航 し て か ら 約 2 時 間 後 。 PIO 星 まで も 
う 少 し と いう と ころ で て 突然 。 船 は 異常 な 月 
動 を 受け た .「 し まっ た ,。 引き 受け る ん じ 
ゃ な か っ た …」 と わめい て も も う 遅 い . お 
れ は 運 を 天 に 任せ る こと に し た . 

気が付く と , そこ は 見 た こと も な い 所 だ 
っ た . 赤色 巨星 が 5 つと, 白い スタ ー ゲ ー 
ト が 見 えた . コ ン ビ ュー タ で 調べ て みる と , 
PiO 星 か ら 8001 バ パーセク も 離れ て し まっ て 
いた . し か も , PiO 星 まで 戻れ る だ け の エ 
ネル ギー も な い . イチ か バチ か , お れ は ス 
ター ゲー ト に 突入 する こと に し た . 


遊び 方 


(8246: キー で 上 下 左右 に 船 を 操作 


(JPC-800 1 mk II 


コス モ ・ ト ラベ ル 1999 


石井 政男 | 


L, 赤色 巨星 に ぶつ か ら な いよ うに 白い ス 
ター ゲー ト に 突入 し て くだ さい. も ちろ ん , 
無重力 状態 な の で 船 は 慣性 飛行 し ます . そ 
し て ゲー ト に 突入 すれ ば 面 ク リア で す . 
な お 1, 2 面 は 単純 で す が 。 5 面 ク リア 
する の は 並 の 人 間 で は 無理 で し ょ う . 1 回 


も ミス せ ず に 5 画 ク リア で きま た と し た ら 。 
あな だ は P.S. か 


= = — 


Жалы よ ര്‍ത്ത, 


10 WIDTH 40,25: CONSOLE 0,25,0,1:COLOR 7, 
32: CMD SCREEN 2,0,7:CMD CLS 3:0UT 81,0: 
ЕҒІМТ А-7 

20 R=R+1:FOR Ізі TO S:READ X,Y 

50 CMD CIRCLE(X,Y),30,1:CMD PAINT (Х,У), 
1,1:МЕХТ I:READ X,Y:CMD СІКСІЕ(Х,Ү),10,2 
s CMD PAINT (Х,Ү),3,3 

40 X=159』Y=99』CMD PSET(X,Y),2 

50 ІФ=ІМР (0) :І1=ІМР (1):VX=VX+(I@=239)-(I 
の =191 ) : VY=VY+ (11=254) - (10=251) 

60 X=X+VX: Y=Y+VY 

70 IF Х<0 OR X> さ 19 THEN УХ--УХаі X=X+VX 

80 IF ഗമ OR Ү>199 THEN VYz-VY:YzY-VY 

90 IF STATUSPOINT (X,Y)=1 GOTO 130 

100 IF STATUSFOINT(X,Y)=3 GOTO 180 

110 ВЕЕР 1:ВЕЕР 0 

120 CMD LINE-(X 。Y) 。2』 GOTO 50 

150 CMD LINE-(X 。Y) 。2 

140 WIDTH,:COLOR RND (1) * フ + ォ 1 

150 LOCATE 13,10:PRINT "GAME OVER '" 

160 LOCATE 12,12:PRINT "HIT SPACE KEY" 


これ か ら 一 気 に ス ター ゲー ト に 突入 だ , ノ 


お まけ 


この 原稿 は , 見 に 代筆 し て も らい まし た. 
これ か らち も る , 石井 英男 & 政 男 を よろ し くく / 


コス モ ・ ト ラベ ル 1999 mum 


170 IF ІМР(9)<>191 GOTO 140 ELSE RUN 

180 CMD LINE-(X。Y) 。2 

190 WIDTH,:LOCATE 1 の 。1 の sPRINT "ROUND" ;Ry 
" CLEAR '''":FOR I=@ TO 500:ВЕЕР 1:NEXT 
I: BEEP Q:VX-0Q:VY-Q 

200 IF R=5 THEN LOCATE 13,12:COLOR 7:PRI 
NT "SUCCEED !!!"sEND ELSE CMD CLS 31GOTO 
20 

210 DATA മ, മ, 28൭9 , മ , മ, 1൭൭ , 28൭ , 1൭൭, 1ടഴ 
130,159,179 

220 DATA 159,30, 99,89,219,89,119,169,19 

,9,169,159,189 

230 DATA 199,99,239,:0,239,169,279,99,10 

0,99,229,99 

240 DATA 1൭൭,൭9൭, 1൭൭, മ, 1൭൭, 1൭൭ , 2൭൭, ൭, 2൭ 
9,129,209,99 

250 DATA 199,58,199,120,269,99,299,28,29 

%9,160,210,99 


31 


РГ i a 
ടര്‌; š 


Р тау 


LIAC, 皆さん は INS っ て 何 か 知 っ て 
いま すか . INS と は 高度 情報 通信 シス テム 
(Infomation: Network System) の 略称 で 
T 

現在 の 通信 シス テム は 電話 。 77773 
リ 通信 , 加入 電話 な どの 各 通 信 シ ステ ム ご 
と に 別々 の ネ ホット ワー ク が 構成 され 、 さら 
に その 通信 方 式 も ,、 た と えば 電話 で あれ ば 
音声 の 波形 を その まま 電気 信号 に し て 伝え 
る アナ ログ 伝送 方 式 を 用 いて いる だ め 。 
度 に 多く の 情報 を 伝え る 4 る こ と が で きま せん . 
これ に 対し て INS は , 超 LSI や 光 フ ァ イ 
バー ケー ブル , デジ タル 変換 機 な どの 最 先 
端 技術 を 導入 し , 各種 の 情報 を すべ て コ 
ンピュータ で 使わ れる よう な 0 と 1 の 組み 
合わ せ で 伝え る デジ タル 伝送 方 式 を 使っ 
て いる た め に , 多彩 な 通信 サー ビス が 一 本 
の 通信 回 線 で 行 な を る と 同時 に , だ れ に で 
も 簡単 に 必要 な 情報 が 取り 出せ る よう に な 
っ つっ て や ます 。 

Саз, その シス テム の 中 の いく 
PEELED 


つか を 紹 


INS ジョ ー ル ー パ 


Же: 


か わい い 人 形 と 産業 用 ロボ ッ ト の 劇 を 見 て いる と , O 
つの 間 に か INS の こと が 理解 で き て し まっ た よう な か 気 
に な っ て し まい ます 。 
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まず 。 こ の ショ ー ル ー ム で 最初 に 目 に つ 
ぃ いた だ の が この シス テム で す . 

この シス テム で は , 映像 と 音声 を 伝送 す 
る こと に より , 離れ た 場所 ど お なおし で も あ だ た だ 
か も 同一 の 場所 に いる か の よう に 会 話 が 行 
な える も の で す . 

この 日 も 見 学者 の 人 た ち が 吉 祥 寺 の ショ 
ー ル ー ム の 人 と 話し て いま し だ が 。 これ 
が あれ ば 遠く の クラ ブ 会 員 や 他 の クラ ブ の 
Ai bt RUA TWAT TY AYU 
ERT Т 


この シス テム は , 電話 で 相手 と 話し な が 
б, 描画 パッ ド に 書い た 廊 字 や 図形 を モニ 
タ 画 面 を 通じ て 送っ た だり, 同時 に や り と り 
じ だ ひで きち る GOTT, 

ilc. 従来 の ファ クシ ミリ な ど は 相手 が 
不在 の と き に は 使え な いと いう も の も あり 
まし た が 。 この シス テム で は 相手 が 不在 で 
あっ て も 自動 的 に 相手 側 の ハー ドコ ピー に 
表示 画面 を 出力 する こと が で きま す . 

これ が あれ ば イラ スト な ども , 実に 簡単 


に 投稿 し て も ら え る よう に な り ま すね . 
デジ タル 描画 通信 サー ビス を 使っ て PiO 君 の 絵 を 描い 
て み ま し た が , タッ チ ・ バ パネ ル で 遊ん で いる みた いで 
面白 いで す よ . 


この シス テム で は , 家庭 に 1 ЧУК 
装置 を 置く だ け で , VRS セン ター に 著 積 る 
れ だ た だ 商品 情報 や 旅行 案内 , スポ ー ツ 情報 な 
どの 多彩 な 情報 を 音声 付 の 動画 や 写真 な ど 


テレ ビレ 会 議 シ ステ ム が あれ ば , 読者 の 皆さん と 直接 楽 
し い 会 話 が で きる の で す . 


電話 を か け て きた 相手 の 電話 番号 や , 金 も わ か 
る デジ タル 電話 サー ビス 用 の 受話 機 . ウー ム , どこ 
t # CR)? 


の 自然 画 で 任意 に 取り 出す こと が で きま す . 
また この シス テム を 使え ば , 写真 の よう 
な コン ピュ ー タ ・ ゲ ー ム も で きる ん で す よ . 


ELE, 簡単 に INS の ほん の 一 部 を 紹介 し 
TALE. これ 以外 に 6 自分 の 声 を 録音 
し て お いて , 好き な と き に 好き な 所 へ 電話 
が で きる 音声 著 積 サ ービス , キャ ブテン サ 
ービス の デジ タル 版 の デジ タル 静止 画 通 
信 サ ービス , 遠く 離れ た 場所 が か がら カ メラ 
を コン トロ ー ル し て 催物 中 継 な ど を カラ ー 
動画 で 行なう 映像 回 線 サ ービス な ん て いう 
も の も あり まし た だ . 

で も 。「 ど どうも: こう いつ だ を の 信 再 も 
く て わか り に くい 」 と 言う 人 が いる こと で 
U ys ൫൦. РОСА 
ルー ム で は ユ コンピュータ 操 作 の 人 形 や 産業 
用 ロボ ッ ト が 。 子供 た ち で も わか る よう に 


0 リッ Кызы 


親切 な 説明 を し て くれ ます . 
さあ , あな だ も 21 世 紀 の 世 界 を 覗き に 行 
っ て み ま せ ん か / 


画像 応答 サー ビス を 使っ て オセ ロ ・ ゲ ー ム を や っ て み 
まし た が , 意外 と コン ビュ ー タ が 強く て …. 


Hoadline 
MZ -2000/2000 


7 Ж» A 
EC ジグ PC-6000 シ リ ー ズ (Сет 


2.5 次 元 の 世界 に ある 1I 国 E OBS] X 
以前 か ら 仲 が 悪かっ た が , 最近 で は 
O 国 の 無 差別 タマ ゴ 破 壊 作戦 まで 開 
始 さ れ た . 

ECT, 188൪൨൫൭1) 
人 ) で ある PiO 君 が . た っ た 1 Ë BB 
を 救い に 旅立っ た の で ある . 


g 


全長 1m ほ どの 鈍 速 な が な タ ンク A 


XA この カオ ス に 乗っ て , TAF 基 地 
を 目指 し て 進む あな た の 目前 に , 47 
〈 手 を 阻む よう に 敵 が 押し 寄せ る . 

TAFE 基 地 ま で は あと すこ し …, だ 
5 が あな た だ は 弾 を 積み 忘れ て いた の で 
あっ た . 


а Champion Golf 
MZ-80B 
їм? 77 УОН a š 32 ZU 
振り で し た だ た. MZ 用 ゴル フ が 久々 の 


登場 で す . 


今回 の コー ス 


ちょ っ と リア ル さ る に 欠け ます が 。 Ж 
ー ル の 描 〈 放物線 や バウ ンド , 変化 
に 冨 ん だ 18 ホ ー ル な ど が 面白 きる を 引 


は キャ ラク タ だ け て РЕТІ 


A コス モ ・ フ ファイター 
ШАЙ MZ-1200-80K/C 
Bii いや ぜ ャ 〇 〇 〇 の 戦士 愛す 


る 人 を 守る た だめ, жеттт э г 
と が 使命 だ 


今日 も 愛 機 を や 操り, 敵 を た お す た 
め 宇 宙 空 間 へ 飛び 立つ . 


PC・8000 シ リー ス 


誤 星 ヴ ア ス に ある と 言わ れる , 高 
価 な 鉱石 バ パパ ー プ ル ・ ス トー ン ヶ 

その 鉱石 を 手 に 入れ る た め , は る 
ば る 惑星 び ア ス へ や っ て きた だ あな 
DPSS vs A fae 


レン ガ と 桶 子 どけ の 塔 の 中 に 隠さ きれ 
Жу; 


-" 
хо 
и U 
= 
D 
2 
š 


Е: — ആയ s cn 


0-і 


HM сын ыы 


тин ин нт ийининин 


PiO 3 号 で 掲載 され た MZ-1200・ 
ë 80K/CH "TURBO 2” が , 今回 は 
E  X] に 移植 され て の 登場 で す . 
前 作 の イメ ー ジ を その まま に , L 
り 強 力 な っ た 3D 風 画面 や .、 サウ ン 
ド 等 を 思う ぞんぶん ゎぉ 楽し みく 〈 だ さる 
N 


・ PEED (kmh?) нз 
4 (SEAR) SPEED Ckmw/h "E He! 1322 
4 омаи т" УЙДЫ 


GEAR, © -SPEED (km/h? 
LON の 100 200 
Т STAAT 
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FS 


ക | Ы" Bomb FT ハー ド ツ ッ プ 


ШІ PC-6000 シ リー ズ A FP-1100 


不運 に も , 帰宅 途中 に 自家 用 へ リ 52 EEL ょ ん な こと か ら 迷 路 に 迷い 込ん 自家 用 超 高 速 字 宙 船 ハー ド ・ シ ッ フ 
が イカ レ て し まっ だ あな た は , ft だ が , „| 途中 に は 恐ろし い CLiotDANR. LFS, そこ に 号 の コン ピュ ー タ 不調 か ら , どこ か 
な く 近 くに あっ た 一 輪 車 に 乗っ て 帰 қуа қаты o は た くき ん の モン スタ ー が …. സം പാഞ്ഞ; Фал) — 

ぇ ーー い 。 こ うな りゃ バク ダン で も 1』 プ し て し まっ た あな た だ 。 脱出 し ょ よう 
使っ て 逃げ 回 っ て や る / に も 6。 ワ ー プ ・ エ ネル ギー を 充て ん 


する まで に は 時 間 が か か る. 


181-11-11 -і-іігісісісісісілігісісісісісісіс 
3 > 


し し し は) ココ し に に 1 ュ に に に し に し に し し し し )- も し し にし し 1 


Asteroid Crab 
1 
& MZ-80B 

210049 月 4 H, 宇宙 空間 アス テ 
ロイ ド ・ ベ ルト で 確認 され た だ 生物 は , 
異 星 人 が 侵略 用 に 作り だ し た 
SPACE CRAB の 大 群 で あっ た 

この まま で いる と , 数 時 間 後 に は 
地球 が 占領 る れ て …. 


‘KONA om 
PC-8000 シ リー スズ 

西 歴 1996 年 7 月 15 日 , 大 平 洋 を 押 
ぇ られ て し まっ た 日 本 軍 は , その 海 
軍 の 戦力 カ ほ は と ん と ど 失 い , な す 術 も 
な か っ た だ . 

LPL, な ん と か 5 日 間 だ け も ち 
こ だ た を る こと が で きれ ば 味方 の 援軍 
が 至 | 着 す る 


ーー FM-7 

異 次 元 , 地下 世界 , 魔境 / どん な 
風 に 呼ん で も 結構 で す . し か し , こ 
こ は シ ュー テ ィ 君 だ け の 世界 、 シュ 
ー テ ィ 君 だ け の 場所 な の で す . 

で すか ら , あな た だ は 決し て この 世 
界 に 人 人 る こと は で きま せん 。 


A ルナ ー シ テ ィ SOS 
X1 シ リー ズ 

1/O'81 年 4 月 号 で 発表 きれ て か ら , これ が 最後 () の 「 ル ナー シテ イィ 
数 々 の 機種 に 移 殖 る きる れ た この ゲー ム , SOS, 名 作 の 味 を , 思う ぞんぶん お 
も う , な に も 言い ませ ん . 楽し みく だ さる 


| 
| 
| 
E 


$ 
EN E XM "КӨК КИЙ | 


スネ ー ク ・ ワ ー ル ド 
PC-8000mk II 

俺 は 大 型 宇 宙 貨 物 船 「 カ サン ドラ 
号 」 の 船長 だ . 

この 文面 で 数 年 前 に デビ ュー し だ 
先 夢 狂人 氏 の この 作品 も , いま で は 
രയ: 
KETS, 


m у ы == = 
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МІС-1001 

全日 も 元気 に ポテ ト 畑 で 働く チッ 
ЖАЯ, Cb, 大 事 な オ イモ を 狙っ 
て カラ ス が 飛ん で きだ り , Жиес 
ォ イ モ が 十 か ら び て きだ り と 悪い こ 
と ば か り . 

LL, 彼 も イモ の 子 ・ 畑 の 子 , 
決っ し て めげ だ り し ませ ん よ . 


Ж. сыр 


um ザ ・ チ ュー ブ 

PC-6000 シ リー ス 
ひょんな こと か ら , PiO 星 の 機密 

情報 を 知っ て し まっ た あな た だ た …. < 

ん な あな た を 消す た め に , 追手 を 放 

oX PIOA. 

5%, 無数 の 追手 を 振り 切っ て 全 


/ エ アイ ) 


宙 空 間 を は きみ , 


r W Potato Panic 


Pu Star Fire 
PC-8000 シ リー スズ 

UEFO や エイ リア ン が 飛び 交 う 宇 
НС БАА ӯ 
2 機 の 砲台 と 攻撃 用 衛星 …. 緊迫 し 
た 空間 の 中 を , いま エネ ルギー 濾 が 


т... 


突き 進む . 


専用 の SPACE MOUSE” で す . 


や は り 名 作 の 味 が 出る も の で すね . 


Pu Space Mouse 
LEVEL MARK) 
PiO 誌 掲載 6 機種 日 は , マー ク 5 


TT) 


| SPACE | 
с, 


多 作 は どん な 機種 に 移植 る され て も, 


F3 PID РІО 
JR -200 
ここ は , ぜ ん らく ビル 9 階 の 905 号 
E, 本 来 な ら ば 空き 家 の こ の 室 も , 
午 休 み と な る と ピオ 君 と DAN 君 が 
や っ て き て “遊び の ワン ダー ラン ド ” 


と 化し て し まい ます . 
さあ 君 も , この ワン ダー ラン ド を 
の ぞい て みて は いか が で すか . 


長 700km の TUBE の 中 を ひだ すら 6 


Э テア メリ カ の 若き 勇者 8 人 / 


12 月 中 旬 ロ ー ド ショ ー 公 開 . ノ 
それ は , ある 晴れ た 日 の 朝 突 然 に 起こ っ た . 


УЖ, キュ ー バ , ニカ ラグ ア の 連合 軍 が 
コロ ラド 州 , カリ ュ メ ッ ト の 町 を 空 か ら 急 
171-01. 5%, Ве, 級友 た ち を 殺さ 
れ た 8 人 の 少年 少女 は , ロッ キー 山中 に 立 
て こも 本: ウル ヴェ リン КАС S SOL Z 
ザン に 変身 し た .「 忘 れる も の か / RAD 


久しぶり に , PC の 2 人 用 ゲー ム の 


БОА 711 B u 7 


悲鳴 を , УХБОЛЖ/) ЖИ Ж ШІ, 銃 を 
ғ, 彼ら は 占領 軍 に 対し 猛 反 撃 を 開始 し 
7- 

これ は , 8B 3 7177-42 ЛАЛЕ и Ж 


来 戦争 スベ クタ ル で ある と 同時 に , 鮮烈 な 
青春 映画 の 傑作 で す . 
フラ フットボール に ., BC, その 青春 を 思い 


っ きり 誠 歌 し て いた 少年 た ち , みん な それ 


ぞ れ 限り な い 未 来 に 夢 と 希望 を 持っ て いた . 


な の に … い ま 彼 ら は 涙 を 捨て , MEAD > 
っ た バラ ライ カ 機 銃 。 ZSU24 地 対空 ロケ ッ 


ト 砲 を 手 に , 戦場 と いう フィ ー ル ド を 走る . 


戦争 と いう 狂気 の 中 で 淡い 恋 も は か な く 
消 玩 。「 も う 恋 な ん て 二度と し な いわ …」 と 
少女 は ほ は つぶやく,。 か つて ウォ ー ク マン を 片 
と きも 離さ な か っ た 音楽 少年 が 殺人 マシ ー 
トッ ん し いん 

物語 は 澄み きっ た 青空 が どこ まで も 広 が 
る 9 月 の 朝 に 始ま り , 翌年 の 早春 2 月 まで 
続き ます .`~ 若 き 勇 者 た ち ” は その 6 箇月 間 
を , 枯葉 散る 道端 で , 深く 積もっ た 雪山 で , 
小春 日 和 の 青い 空 の 下 で 血みどろ の ゲリラ 
戦 を 展開 . ラ スト の ヒロ イッ ク て で 凄絶 な ~ カ 
リュ メッ トン” 解放 作戦 へ と な だ れ 込 ん で い 
(<, その ダイ ナミ ッ ク な 戦闘 シー ン は 観 
る 者 を 圧倒 せ ず に は お きま せん . 


C MGM/ UA 映画 CIC 配 給 


TMI TIT ZT ATU ARREST 
ウト サイ ダー」, 「 地 獄 の 7 人 」 で 今 売り 出 
し 中 の 硬派 な マス ク が 魅力 の パト リッ ク ・ 
An rqX 4I. 少年 ға A4 
ECT WI SERRATE ER 
ж E.T, f š AS—2772, നൽ — 
マス ・ ハ ウエ ル が 好演 し て いま す . 

2 人 の 女 戦士 に 「 ジ ョ ー ズ 3 」 の リー・ 
トン プ ソ ン と 「 俺 た ちの 明日 」 の ジェ ニ フ 
y—*ZvtZÓÀiL, マシ ン ガ ン を 手 に 男 
顔負け の 大 活躍 を し て いま す . 一 方 , は か 
な い 恋 と その キュ ー ト な 表情 で 殺伐 と し た 
戦場 に 可憐 な 花 を 添え て いま す . 

映画 に 登場 する ソ連 の 武装 タン ク , ZSU 
24 対 空 , 3 機 の 大 型 戦略 へ リコ プ タ な ど は , 
国防 省 の 図面 や 報告 書 を 含む 様々 な 資料 を 
元 に 造ら れ , 最新 の ソ連 軍事 テク ノロ ジー 
と 一 致し て いま す . この 他 , ゲリラ 戦 撮影 
の た め に 主演 者 の 大 半 が 戦闘 訓練 を 受け て 
いる , 最低 1.000 時 間 の 体験 を 持つ 悪 練 の パ 
ラ シ ュ ー ト 隊員 50 名 と 地上 の エキ スト ラ が , 
V x&38 5 k СЕ g) [8 8323EI- 232 UL, DC 3 機 か 
ら 高 校 の フッ ト ボ ー ル ・ フ ィ ー ル ド に 降下 
する 大 部 隊 の 着陸 と いう シー ン な ど , RE 
ころ も 富 豊 な 映画 で す . 
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と ころ で , 皆さん は 朝 の ラッ シュ 時 の 満 
M I 2 азақ pud Cà 
すか ? この 日 の 早稲 田 祭 は を それ を 思い 出 


きせ る ほど の 混み よう て, 歩く の も ヨ チ ヨ ョ 
チ し な が ら の ペン ギン 歩き . そん な 人 ご み 
を か き 分 け て 行っ だ た の は , 16 号 館 411 教 室 で 
展示 を し て い だ た コン ピュ ー タ 研究 会 で し た . 
ST, ここ の 展示 内 容 を ざっ と 紹介 する 
L, FM- 7 を 使っ て の 相性 判断 , PC-8801 で 
ud к. そし て 目玉 と も いえ る 


こい oe 


ディ スプ レイ に 見 入り な が ら , に ぎ や か に 占い を 楽し 
ん で いた 女性 陣 . きっ と 彼 と の 相性 を 占っ て いた ん で 
У r F 


2 人 の 未来 の 予想 画面 を 見 な が ら , オペ レー ター の 説 
明 を じっと 聞い て いた カッ プル さん . この 日 は 天気 も 
よく 〈 著 い 日 だ つた けれ ど , オペ レー ター の 彼女 は も っ 
と 著 か っ た ん じゃ な い の か な 2? 


係 の 人 の 説明 を 聞き な が ら , 楽し そ を うに コン ピュ ー タ 
ааа ケー ジョシ も し C Us: 2 ATO BE 
は 真剣 その も の . 


ソフ トウ ェ ア も 月 に 飛ぶ ("2) 


東京 電機 大 学 ソ フト ウェ ア 研 究 部 
っ だ シミ ュ レ ー タ 班 ほ 上 マシン ラン ゲー ジ 班 


を 紹介 し ます . 


次 に 訪れ だ の は 。 御茶ノ水 に ある 電 大 の 
ソフ トウ エア 研究 部 ここ で は 6 つ に 分 か 
4,72 HED, 


それ ぞ れ 研究 し だ な こと を сн kd, $ š m p RHETT, ここ で は 
て いま し だ 。 その せい か , 文化 祭 と いう よ FM- 7 を 使っ て 自動 車 の 加速 シミ ュ レ ー シ 
りゃ も 人 研究 発表 会 し いう 感じ も や うけ ま Sete ョ ン を 行なっ て いま し だ ただ. 内 容 は , 自動 車 


これ は 技術 系 大 学 の 特徴 な の か も し れ ま せ の カタ ログ か ら 集 め た だ 40 以上 の デー タ を 基 
ん ta. с, 0.1 秒 ご と の エン ジン 回 転 数 , 速度 

ST, 細か な 展示 内 容 に つい て で す が , 走行 距離 な ど を グ ま ラフ に まとめ , 車種 に 
難 し いこ と を 聞か る れ て チン プン カン デン 。 よっ て どの くら い ぃ 違う か と いう こと を 調べ 
を のだめ, 私 た ち で も 比較 的 わか りや すか 


-8000 班 の 傑作 品 。8000 を 使っ た CPU ボー ト で す . し 


ここ で も や っ ぱり フォ ー マ ッ ト が 置い て あり まし た . 
か も これ を 制御 し て いた の が , あの 往年 の 名 機 MZ-80 どう や ら 電 大 で も ラム ちゃ ん の 人 気 は 根強い よう で す 
K だ っ た ん で す よ . オー ルド ・ パ ワー は まだ まだ 健在 で Ж. 

+. 


アナ タ が 好き よ … 


コン ピュ ー タ より 


早稲 田 大 学 コ ンピュータ 研究 


UNIVAC の 画像 処理 シス テム を PC-8801 
で 制御 し て の 相性 占い と , コン ピュ ー タ 占 
い が 中 心 と な っ て いま し た. 

まだ , な に げ な く 教 室 の 中 を 流れ る 音楽 
の ルー ツ を だ どっ て みる と … な ん と そこ に 
は PC-8801 と CMU-800 (シン セ モ サ イザ ) が 
ある だ け . そう で す , コン ピュ ー タ が BGM 
を 流し て い だ の で す . 

CUT, 教室 の 隅 で は PC-8801 が 3 台 解 
放 き る れ て お り , 来場 者 が 直接 機械 に 触れ な 
が ちら コン ピュ ー タ と の ココ ミュニケーション 
を 満喫 し て いま し た . 
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学園 祭 で 忘れ て な ら な いも の が 模擬 店 で すね . 早稲 田 
の キャ ン パ ス に も 多く の 模擬 店 が あり まし た が , そん 
な 中 か ら 捜 し だ し た 美人 売り 子 の 彼女 た ち . つき た て 
の 甘い お も ち を 売っ て お り ま し た . 


取材 が 終わ っ て 表 へ 出 て きた 我々 を 待っ て くれ た ペン 
キ ギン 君 . きっ と 南極 か ら の 留学 生 だ っ た の で し ょ う ? 


さす が 技術 系 大 学 の 電気 大 . 壁 の 研究 発表 を 読ん で み 
て も 我々 PiO ひ 編集 部 の 一 同 に は チン プン カン プン … 
や っ ぱり ゲー ム が 一 番 合 っ て いる の か な ? 


FM- 7 の 画面 に 表示 され た 加速 の シミ ュ レ ーション 結 
X. こう し て みる と 同じ 排気 量 の 車 で も , ずい ぶん パ 
ワー に 差 が ある こと が 一 目 瞭 然 . 


NTA TAT SET TF 545 
は PC-8801 を 使っ て , 東京 首都 園 の 国鉄 駅 


間 に お ける 最短 アー ト と その 運賃 計算 を 行 
な う プ ログラム の デモ な ど を 行なっ て いま 


ビジ ュ ア ル ・ コ ンピュータ 


東京 農工 大 学 工学 部 電子 工学 科 伊東 研究 室 / 小 林 研 究 室 


3 桜 め は 東京 の 武蔵 野 に ある 東京 農工 大 . 
ここ で は 毎日 CAD と 弟 音波 診断 装置 の 研 
究 を 行なっ て いる と いう 伊東 研究 室 と , Ж 
品 表 示 装 置 (LCD) に 関す る 研究 を 行なっ 
て いる 小林 研究 室 の 展示 を 取材 し まし た . 

伊東 研 で は , CAD 用 に 独自 開発 し た 
ECSEC-86 と いう コ ユ コンピュー ター を 使い . 
TV カメ ラ で 撮っ た 画像 を デリ ンタ に ハー 
ド ・ コ ピー きる せる デモ を 行なっ て お り 。 m 


FM- 7 を 使っ て 制御 し て いた LCD の アニ メー ショ ン 
表示 . TV 画面 に 表示 する の は 簡単 で す が , LCD に 表示 
する と な る と その プロ グラ ム だ け で も 大 変 な も の で す 


楽し そう に PC-8801 を 使っ た ホロ スコ ー プ の 実演 を 行 
な っ て いた , オペ レー ター の 彼女 . キー 操作 な ど は な 
か な か の も の す . 


スロ トド ゲー ニム を 使っ つて の フォ — TI (у о РА 
ചാട асс оь SEY) | 
“аке СЕТ КЖ ЛЕГІ. / | 


示 守 の 前 に は な ん 枚 も の ハー ド ・ 
貼り 付け て あり まし た . 

また 小林 研 で は , 液晶 の 作り 方 や 現在 液 
韻 が どの よう な 使わ れ 方 を し て いる か と い 
うこ と に つい て の 展示 が あり , その 中 で 


コピ ー カ 


現在 日 本 最小 と いわ れる 2.7 イ ンチ の LCD 
を 使っ た 液晶 テレ ビ や FM- 7 で 操作 し な が 
ら 液 曲 に アニ メ を 表示 る せる デモ な ど が 目 
を 引き まし た . 


自作 ボー ド と 自作 LCD を 使っ て の デモ ンス トレ ー シ 
ョ ン . これ だ け の 表示 で も , 細か な デー タ が 必要 な ん 
で じょう ね. 


し た 


画像 処理 操 置 で 撮っ た ハー ド ・ コ ピー. この と お りか 
な り 高 精度 で ,. まる で 写真 に 撮っ た よう う で す . モデ 
ル に な っ て くれ た 国立 音 大 の お 2 人 さん の 笑顔 も 可愛 
いい ね . 


3 種類 の アニ メキ ャ ラク タ の 描か れ た 液晶 板 . みん な 
1 つ ず つ 微 妙 に 作り 方 が 違い , それ ぞ れ 独特 の 個性 が 
感じ られ ます ね . 


コン 


ビ ピュー タダ ・ コ ミュ ニケ ーション 


日 本 工学 院 専 門 学校 情報 処理 科 電算 ソフ ト 委 員 会 


最後 は コン ピュ ー タ ー の 専門 学校 し し て 
有名 な 日 本 工学 院 . ここ は 技術 の 専門 学校 
だ け に , 置い て ある コン ピュ ー タ ー の 数 は 
きる す が に 多かっ だ です が, そん な 中 か ら 電 
算 ソ フト 委員 会 の 展示 を 取材 し て み ま し た . 

中 に 入っ て まず びっ くり . ADOT CR 


PC-8801 と RS-232C を 使っ た 2 人 用 の オセ ロ ゲ ー ム 、. 
時 間 の 経つ の も 忘れ た よう に 熱中 し て いま し た . 


ここ で も 壁 一 面 に アニ メキ ャ ラク ター の フォ ー マ ッ ト 
が あり まし た が , や っ ぱり 人 人 気 は ラム ちゃ ん や ナウ シ 
カ の よう で す . 


駅 ビル の 実写 写真 を 基 に 作ら れ た , 3D ワ グラフィック 
の 画面 . これ だ け の 表示 を させ る に は , さぞ か し た く 
さん の デー タ が 必要 だ っ た こと で し ょ う . 


くに 置い て あっ だ FM- ç CU あの 
UOOTOY が 走っ て いた だ の で す .。 そして, を 
の 後ろ の 壁 に は 〇 や メ や 較 な どの キャ ラク 
久 だ け で 作っ た 絵 (フォ ー マ ッ ト と 呼ぶ を 
ITT) が な ん 枚 も 飾っ て あり まし た . 

ここ の 展示 で まず 目 を 引い だ の は , PC 
9801 を 使っ だ 駅 ビル の 3D グ ラフ ィ ッ ク で 
し だ . な ん で も , 数 枚 の 写真 を 基 に デー タ 
を 入力 し た と か で , な か な か の も の … 

この 他 に は , PC-232 じ を 使っ て PC-8801 
2 台 を つなぎ , 来場 者 の 人 に 2 人 用 オセ モロ 
を 楽し ませ だ り ( 最 初 の 子 定 で は , PC-9801 
と 大 型 コ ンピュータ ー の ACOS と ょ と つ な で 子 
定 ど っ だ そう で す ), 同じ く PC-8801 を 使っ 
だ ホロ スコ ー ジ (hv), めずらし い 
と ころ で は FM-77 で の LOGO の デモ な ど が 
人 気 を 集め て いま し た . 


各 校 と も 工夫 を 擬 ら し た 展示 内 容 を / と 


え で は や は り マ イコ ン ニ ゲー ム = 遊 びと 考 


える 来場 者 が 多い よう で , 壁 に 展示 され て 
いる 研究 発表 より も , ゲー ム や 占い な ど に 


e o a 


今回 の PiO10 を 見 て も わか る よう に , 最近 の ソフ ト は ハー ド を 
よく 知っ て いる よう で すね . 特に プラ ズ マ ・ ラ イン な ど は 8 ビッ 
ト ・ マ シン を 限界 近く まで 使い こなし て いる よう で す . も は や , き 


れい な 絵 , キャ ラク タ の リア ル な 動き と いう の は 常識 に な りつ つ 


ある よう で す . 


アマ ゾン 学術 探検 
ジョ ー ク だ つぶ り の の 
笑え る ロー ルプ レイ ング 


な か ヵ な か 楽し い (面白 いと いう より 楽し 
いと いう 方 が ピッ ダリ で すね ) ロー ルフ 
レイ ング ・ ゲ ー ム が 琶 場 し まし た . Жей 
5k. 和 は この ロー ルプ レイ ング ・* 


と いう の が 苦手 で , この 原稿 を 書く と きも 


し た ( 何 回 や っ て も , 全然 先 に 進め な い の 
で すか * ら )。 

と ころ が この ゲー ム は ちょ っ と 違っ だ の 
Ст. 初心 者 で も , また 他 の ロー ルプ レイ 
ング ・ ゲ ー ム で は 楽し め な いと いう 人 人 で も 。, 
コツ さえ つか め ば 意 外 と 先 に 進め て し まう 
の で すか 6. 

この ゲー ム の コツ と し て は , 持ち 金 と よ 
く 相 談 し な が ら も 必要 な 装備 を する こと . 
特に メメ メメ だ け は 高く て も 絶対 に 買わ な け 
れ ば な り ま せん . まだ, 地図 を 作っ たら 面 


Paranoia-88 


壁 を 動 ガ し , 敵 を 閉じ 込め ろ ! 
それ ガ ら が 君 の 仕事 だ ! 


PC-6000 z リー ズ に ビラ ミッ Sio Ed 


うぅ う ゲ ー ム が あり , この “パラ ノイ ア -88” は 

を の 移植 版 な の だ そう で す . と ころ が 聞い 

た 話 と や っ て みる と で は 大 違い まっ だく 

別 の ゲー ム と 言っ て いい くら いな の で す . 
} 


画面 写真 を 見 て も ら え ば わか カ か ' る とおり, 
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A Sey 


PC-9801/E/F, PC-8801 /mkII 

FM-7 

ディ スク Ұ9,800 

ロー ルプ レイ ング 

倒 が ら ず に すぐ に 街 に 戻る こと mol 

で 最初 に ジャ ング ル に 入っ た 地点 で キャ ン 

プ を 張れ ば 街 に 戻れ ます ). 地 図 を 完成 きせ 

な いで 他 の 所 へ 行っ て し まう と , そこ の 地 
図 は 消え ん て し まい ます . 

と ころ で 。 この ゲー ム の 面白 さと いう の 


T&E 


PC-8801/mkII 

カセ ッ ト \4,000 

ディ スク \6,800 

リア クシ ョ ン 

キャ ラク タ が 大 幅 に 変わ っ て いま す . また 

動き も と て も リア ル で , 敵 に や られ だ た とき 

E, ひっ くり 返っ て 手足 を バタ バタ る きせ 
る の で す . 

LL, 原作 と の - 番 の 大 き な 違い は , 
ЕРІЛУМТІЕЗІСІ る UE SE TC 
れ に よっ て , 原作 に は あま り 感 じ ら れ な か 
っ た パズル 性 が 出 て き て ,。 し か も 変化 の 大 
きい ゲー ム に な っ た の で す . 

id. 敵 を 閉じ 込め て し まわ な けれ ば 高 
得点 は 望め ませ ん (特に ミイ ラ 男 に は 何 も 
で き ない の で 注意 ). を その た だ ため に は 敵 の 動き 
の パタ ー ン を よく 掴ん で なお か な けれ ば な り 
ませ ん . 

SDD RS TLS 庶 な ら ず や っ て と も まっ 
た こと な の で す が ,。 な ん と ょ と 自分 自身 を 迷路 
の 中 に 閉じ 込め , どう や っ て も 抜け 出せ な 


また , アイ デア も だ ん だ ん と 凝っ て き て いま す . 今回 の 中 で は 
特に ウィ ング マン が そう で すね . こう いう アイ デア た っ ぷり の ゲ 
ー ム は , た と えた いし て 先 に 進め な く て も 楽し いも の で す . 


は リア デルタ イム 型 ロ ー ル プレ イン グ ・ ゲ ー 
ム に ある と 思う の で す が 。 た だ ただ 1 つ 上 難点 
が ある の で す . それ は 人 の 移動 に カー ソル 
・ キ ー を 使う こと . 普通 どおり に テン ・ キ 
ー に し て くれ れ ば も っ と 楽 だ っ だ の に な あぁ 
と (キー 操作 が と て 6 簡単 な だ どけ に ) 思い 
ЖА? (അ) 
《 問 い 合 わせ 先 〉 (株 ) ス ター・ ク ラフ ト 
8171 東京 都 豊 島 区 南 池袋 2-23-4 
富沢 ビル 4F 
ТЕ (03) 988-2988 


と も ぅ 充分 に 頭 の 中 に 入 


《 問 い 合 わせ 先 〉 (株 ) テ ィ ー ア ンド イー ソン 
フト 
465 愛知 県 名 古屋 市 名 東 区 幅 が 丘 1810 
TE- QE 773-7770 


PLAZUMA LINE 


8 ピッ ト ・ マ シン で , еі ныса / 
高速 3D 表 示 と いえ ば , Ж まで は ほ と 
ҒАПУ Ту プ レード м け で 描か ' れ 
で < も っ > 510-225) "Арда LOL. 
の ゲー ム , 陰影 の 付い た 2 ЗОЖ Ји 7 
ー ム を や っ て いて , 思わ ず 体 が 傾い じい て し ま 
いま す . 
ゲー ム の 目的 は , 
され だ コー ス を 走り 抜け 


A 系 内 に 設定 
る 宇宙 レー ス で す . 


ラマ リ レ > 


TOIT 
X1D, PC-8801/mkII,PC-6601 
ディ スク Y6,900 


X1/C, PC-8801/mkII,PC-6001mkII,MZ2200/2000 


カセ ッ ト \4.800 

リア クジ ョ ン 

イィ イント が あり , これ を 通過 し な いと ユー ス ・ 

アウ ト と な っ て 失格 で す .. そ の 他 に も 浮遊 

物体 が あり , 燃料 補給 や シー ルド 強化 , 武 

香 の 回 収 が で びき ます. チェ ッ ク ・ ポ イン ト 
へ の ドッ ク ・ イ ン は 慎重 に 

計器 類 の 表示 も 良く 出来 て お ちり ま す が , 

8 ビッ ト で これ だ け 素 晴らし い 3D 表 示 を 

行なっ て いる の で ゲー ム と し て 高 〈 評価 で 


《 問 い 合 わせ 先 》 (株 ) テ クノ ソフ ト 
98857 長崎 県 佐世保 市 福 石 町 4-14 


コー ス 中 に いく つも の ドッ ク や チェ ッ ク ・ ポ ボ നാം തന്‌. 0 €) ТҰ (0956) 33-5555 
i i 101 - 8 
In The Psychic City vs 


近 未 来 SF 派 に 贈る 
本 格 的 ロー ルプ レイ ング ・ ゲ ー ム 


С АУ», ニュー ョ ヨーク : Ey 
世界 大 戦は この 街 に 無数 の 爪 跡 を 残し た . 
し か し , 市 民 の カ は この 傷 を や 早く も いや し , 
街 は まだ た だく 〈 間 に 復興 きる きれ て いっ た . 

മാ, 人 人 類 は まだ 新た に 敵 を 作っ て し ま 
っ だ . 大 戦 が 終わ る と 同時 に 世に 知ら れ だ た, 


ЖАЗА ST YT A TB ЕТАН: 
まだ 1 人 , ラッ グ 人 が この 街 に 侵入 し て き 
Kee 


この よう な スト ー リ ー で 始ま る この ゲー 
A, ちょ っ と スピ ー ド が 遅い の が 気 に ヵ か : か ヵ か * 


СЕ, な ヵ : な ヵ 面 暫 じ ゲー ム な の で す . 
tuU, പ്‌ ന്‌്‌ 
зе; ഇനു ൮ な だ だ は 


ファ イヤ ー ク リス タル 


あの ブラ ッ フ ・ オ URS Ф 


мо ГА ЖЕТЕР; 
手 に で き な か っ だ あな た だ も ,。 今度 は ファ уя 
ヤー クリ スタ ル を 手 に 入れ て 〈 く だき 

К cop чур OG S 
ニキ ス " の 続編 な の で す . その だ め , “ブラ 

prs オニ キス" が な いと ので Ата 
xA. 持っ て いな い 人 人 は, 今 す ぐに ショ ッ 
7^GO / 

今度 の 舞台 は 今 ま で 閉ざさ ざき れ て いた 寺院 . 
旅 を 終え , W bnt ot $T e po гы 
ちの 前 に は どん な 危険 が 待ち 構え を て いる の 
е ME. アァ アイ ヤー クリ スタ ル 


ウィ ング マヤ マン 
親切 設計 , 
プラ スィ ッ グ ・ アド ペン チー 


OTR ന്ത്‌ TO Ree 
Pit jupe iM s d 
だ く 見 られ な か っ た 特徴 が に くつ も あり ま 
+. その 中 の いく つか を 簡単 に 紹介 し まし 
E33 

まず グラ フィ ッ ク 画 面 が 表示 る れる とき, 
美紅 ちゃ ん が 左側 に ある ヒモ を 引っ 張り ま 
7. する と 上, まる で プ ブラインド ( 縦 型 の ) 
を 閉め る よう に サー ッ ヒ と 画面 が 消え そし 
て ヒモ を 放す と また 同じ よう に サー ッ ヒ と 現 
われ ます . この 効果 は な か な か 面白 く , #2 
を ロー ド し だ りす る 時 間 が まっ だ た だく 気 に 

り よ せん. 


カセ ッ ト ҰЗ,800, ディ スク Y5,800 

PC-8801/mkII 用 近日 発売 予定 

ロー ルプ レイ ング 

ラッ プ 人 の 1 人 で , 集団 移住 し た ラッ プ 人 
だ E 先 の 手持 0 り を 見 つけ だ すこ と が 

目的 で ~ 

^Tt. 主人 公 の キャ ラク タ を 造る こと か 
ら こ の ゲー ム は 始ま り ま す . テレ ポー ト , 
テレ ッ パ シー, YET, 防御 , 攻撃 の 5 つの 能 
力 の うち , どれ を 強く すれ ば -- 番 いい の か 


ന്‌, «Тс 
к dd 歩き 回 り , fl を どん どん 集め 


さき ます. な お , 途中 で 何 種類 も の 敵 と 
M. പ ന; അവ്‌... 
FI. PI RB DW LESH 
うじ ゃ あり ませ ん か >。 

ЕТ, SOT SL ЕТ С 


В.Р.5 
PC-9801/E/F, PC-8801/mk II 
カセ ッ ト Ұ4,800, ディ スク Ұ7,800 
ロー ルプ レイ ング 
の 秘密 と は 2? 


き て 前 作 プ ラッ ク ・ オ ニキ ス で は , 戦闘 


undead | 


Жз сые 


nd ag ^ 
ЕБ nner sp 


WI 

PC-8801/mk II 

ディ スク Ұ5,800 

BUR IMP ടു 

Ж, ഷ്‌ മര? 
きん が 聞い て き て , フレイ ヤー が コマ ンド 


ots %Ұз- 
22 Г ж» 


重力 する と き , 
が スク ロー ル し ます . 
と て も スム ー ズ に 進行 し 


を の 方 向 に グラ フィ ッ ク 画 面 
を の だ め 。 ゲー ム が 
toO TE 


《 問 い 合 わせ 先 》 (株 ) ホ ッ ト ・ ビ イィ 

$164 東京 都 中 野 区 東中野 4-4-1 
丸 新 ビ ル 5 F 

® (03) 360-3623 


ジー ン て は 先制 攻撃 どけ で 。 あと は ほ は コシ ン ピ ゼ 
= - 2 A- ) 判 断 し て いま し ただ. し 
か し ゃ この 9 リフ デイ ヤー ク БАТТЫ 
ます . 男 士 の レベ ル に よっ て 使え る 魔法 に 
限度 は あり ます が 、 何 と 14 種 類 も の 魔法 を 
使っ で 相手 を 倒す こと が で きる の で す / 
SLE, 前 作 よ り も グッ と コマ ンド が 増 
えて いる の で 。 より 0 細か ヵ :〈 命令 で きる よう 
< 本 な まで も だ の യം 2h Tw DE SE 
220 ど 気 に な ら な いか いら 不思議 で す 
《 問 い 合 わせ 先 j: ビー・ ピ ー・ エ ス 
T2221 横浜 市 神奈 川 区 西寺 尾 1-20-12 
清水 ビル 2 F 
© (045) 421-7421 ( 


E 


を 入力 する と き に カー ソル が 出 て きま すね . 
HRS "aC, оо >” 程度 な の 
СТС СОГУ р C au 
マン が 手振り 足 振り 踊っ て い 3 人 < 
[Dtm uq КБ. АЙ ЛАРА ШР あお "SSM 
ERROR D. 9 71.70 


パグ と る せ て いる の で す eoi 
ТЕСЕ”; таяғы & D We тс 


Qu U e; 

まだ まだ いろ いろ と ある の で す が 5。 最後 
PAE പ്‌ ТЕ TET TOSS 
നിഗ (m) 
《 問 い 合 わせ 先 》 (株 ) エ ニッ クス 
W160 東京 都 新宿 区 西新 宿 7-1 8 

に パピ ビル ЗЕ 

7Ұ (03) 366-4251 
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piO10 
コジ ラ 


映画 ゴジ ラガ その まま ゲー ム に な つた だ / 


この ゲー ム は, 昭和 29 年 に 公開 され た 東 
宝 映 画 “TY” の スト ー リ ー に を そっ て 作 
られ だ アド ベン チャ ー ゲ ー ム で す . 結構 や 
る し い ゲ ー ム な の で , 初心 者 に は ちょ うど 
いい ん じゃ や な いか が な ? 

AT, この ゲー ム は 3 つの 部 分 に 分 か れ 
て いま す 。 第 1 部 が ゴジラ 発見 まで , 第 2 
部 が ゴジ ラ 上 陸 , 第 3 部 が ゴジ ラ を 倒す ま 
で の アド ベン チャ ー ゲ ー ム で す 。 

まず , 第 1 部 で の 舞台 は ゴジ ラ ァ "出現 し 
た と いわ れる 大 戸島 . あな だ は 大 戸島 災害 
. 調 査 隊 の 1 人 と し て 島内 を 歩き 回 り , 情報 
を 入手 し な けれ ば な り ま せん . 


バイ キン 君 の スイ ッ チ オノ 
バイ キン 君 は 今 も 
ネズ ミ を 退治 する の で し だ 


この 子 ス イッ チ を ON する 前 に , まず は 
あの 親 ス イッ チ を OFE に し な いと 感電 し ち 
や うな か な で も な を ル を で て ご ん な と ころ に ON の 
子 ス イッ チ が ある の ? え ぇ い , 面倒 だ 
е O NE DERE 25% Жары а ум 
Ф o ces З PATE 2 we あ た に 
AT СООО 32൦07. A 
イマ セン ) 

こん な 風 に 夢中 熱中 きせ て くれ る の が こ 
の バイ キン 巻 の スイ ッ チ オォ ンジ シン". な の で あ 
927, この が ゲーム で な は 。- な を な に より 5 ゲー 


ム の 設定 自体 が た っ て も アイ デア し て いる 


探険 隊 ( シ リー スズ 第 | 弾 ) 


12 覆 の フィ ルム に は いつ だ い 何 が や 


「 あ な だ た は, TV ディ レク ター の 頼み で 前 
人 未踏 の 洞窟 を 探険 する こと に な っ だ. だ 
APOIO A WAT キン ェ エア まで て に 
浮か ば れ な い 魂 た ち を 撮り 収め ゆる こと が で 
S 57:55»? 

こん な スト ー リ ー で 始ま る この ゲー ム , b 

ょ っ と ジョ ー ク っ ぱ ぽく て 楽し い ゲ ー ム で す . 

AT, この 洞窟 内 に は ロー ププ が ぶら 下 が 
eNO Su Fa SSN だ この りう ジョー タ が つっ つて? 
才 え て も ご らん な る きい , 人 間 が 入っ た こと 

も な い 洞 窟 に 。 な ん で ロー プ カ が ぶら 下がっ 

て いる の で すか / 
まだ , 面 ク リア の と き に ディ レク ター が 


TREASURE ISLAND 


教育 用 みた いな, そう で な いよ うな 


== 


FM-7, PC-8801/mk II 

カセ ッ ト ¥4,800 

УЕЗМОТҰ- 

次 の 第 2 部 の 舞台 は , ゴジ ラ が 上 陸 し た 

後 の 東京 . あな た な は ゴジ ラ を 倒せ る た だ 1 

ЛОЛ, 六 沢 博士 に 協力 し て も ら わ な く 
て は な り ま せん . 

CLT, 第 3 部 で は ゴジ ラ を 倒す な た なめ に 
海中 へ と 潜り ます . あな た だ の 役割 は 芳沢 博 
+. 制限 時 間 内 に ゴジ ラ を 倒 き な けれ ば な 
り ま せん (キー 入力 時 に 5 時 計 は 進ん で し 
まう の で す )。 

な お , この ゲー ム の スタ ー ト 時 に は あの 
東宝 の マー ク や スタ ッ フ ・ リ スト が ,。 また 
ゲー ム 途 中 に は 映画 で 使わ れ だ た BGM ЖЕ 
2441, グラ フィ ッ ク 画 面 は スチ ー ル 写真 な 


ソニ ー 

SMC-70/777 

ディ スク (3.5 イ ンチ ) \5.800 
リア クシ ョ ン 


Ж Ж; 

バイ キン 君 や ネズ ミ は , 電流 が 流れ て い 
る 子 ス イッ チ に 触れ る と 感電 死 し て し まい 
t. その た め 。 親 ス イッ チ や 子 ス イッ チ 
ON, OFF さ せる 順番 を 充分 に 考え な け 
れ ば と て も 面 ク リア (画面 数 は な ん と 255 
面 / 5 一 6 面 し か いか な い 私 に は 気 の 遠 
て な る よう な 面 数 で す ) は で きえ せん 。 し か 
も この 画面 と いう の が , 階段 が 迷路 の よう 
に 入り 組ん で いる う ょ ぇ ゃ に 配線 図 が 重なっ て 
いる と いう , と て も 複雑 な も の な の で す . 

この 他 に も まだ まだ 書き だ いこ と が ある 


デー タウ ェ ス ト 
FM-7, PC-8801/mk II, X1/C/D 
カセ ッ ト ҰЗ,600, ディ スク Y4,800 
リア クシ ョ ン 
プレ イヤ ギー の 撮っ た フィ ルム の 前 を 歩き , 
気に入っ た 写真 に 対し で ボー ナス を 支払 っ 
て くれ ます ,. こう いう 気 の き いなだ ボー ナス 
i, 面 ク リア が と て も 楽し み に な り ま すね . 
だ だ 1 つ だ け 言 わせ て も ら 6 ら う な ら 。 デン 
イヤ ー が 死ん だ と き や ゲ ー ム ・ オ ー バ バー の 
と き が ちょ っ と 寂し いで すね . だ と えば , 
ォ ン ・ エ ア ま で に 戻れ な か っ だ ら .“ オ マエ 
は クビ だ ./" と か 。 ゲー ム ・ オ オー バー な ら 
ディ イレ クタ ーー に 対し て あん な カメ ラマ ン 
し か 使え な いな ら 番 組 を や め ち ま え / ん "で 
らい の ジョ ー ク が 欲し か っ だ と ころ で す . 
(ൽ) 


DATA POP 
PC-8801/mk II 
ディ スク (2 枚 組 ) Ұ8,800 
し ek сый 


と に ガ ぐ , 宝 を 手 に 入れ りや いい の さ 


ലിം, に ペン チャ ー ゲ ー ム を 
いう より ,。 どちら か と いう と 教育 用 ソフ ト 
と SRO US NTT WIL5..t 
ЕЗ “ЖМұүтутА TWA Ti TST 
は 単語 テス ト を やら され る の で すか ら . 

5, この ゲー ム の も と に な っ だ の は ス 
ティ ー プ ブン ソン が 書い た 小説 "宝島" で す . 
し か も 。 これ 1. 本 て リアル RAL: 
や ロー ルプ レイ ング ・ ゲ ー ム まで 楽し め る 
と いう 。 ちょ っ と ぜ い た だく な 作り の ゲー ム 
な の で す . 
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この うち 。 リ アル タイ ム ・ ゲ ー ム の 方 は キ 
ー タ イプ の 練習 も で きる と いう 変わ っ だ ゲー 
ム な の で す ( ほ ら , ここ で も 教育 的 しょ? ). 
プレ イヤ ギー は, 迷路 の 中 を 逃げ 回 る た だ ため に 
正確 に キー を だ た だ か な けれ ば な り ま せん (T 
の ゲー ム で 高 得点 を 取る と 。 ゲー ム 中 に ヒ 
WRN COS: Ло Жеке Жы «ту к) Ж 

às, この ゲー ム な ら 教 育て ママ に 怒ら れ 
る こと は あり ませ ん . それ で も 怒ら れ そ う 
に な っ だ た だ ら 。“ こ れ は 教育 用 な ん だ よ " Ей 
っ て PIO を 見 せ て あげ て くだ きい . 納得 し 


ど に 使わ れ た 有名 な シー ン ば か り が 入っ て 
EE а a (©) 
《 問 い 合 わせ 先 》 東宝 (株 ) 事 業 部 

100 東京 都 千代 田 区 有楽 町 1-2-1 

Æ (03) 591-6621 


m ГІ он 
WI: 000000 5С: 850 BAIKIN: 3 
の で す が , 最後 に 一 言 だ け .「 簡 単に 階段 登 
れる よう に し て くれ 一 」 (ൽ) 


< 問い 合わ せ 先 > ソニ ー( 株 ) 
45141 東京 都 品川 区 北 品川 (6-7-35 
Т% (03) 448-3311 


(問い 合わ せ 先 〉》 デー タウ ェ ス ト ・ ジ ャ パ 
А 
556 大 阪 市 浪速 区 難波 中 2-7-17 
(City 松本 201) 
7% (06) 632-0937 


ТИЛИ 13%! FENER [90051] 
[ത്തനം br-1] АЗЕ ЫП, 


TI LASERS TT): て は 安心 し て 
ゲー ム を 楽し ん で くだ きい. (അ) 
《 問 い 合わ せ 先 〉 (株 ) デ ー タ ボ ポップ 
45150 東京 都 渋谷 区 恵比寿 西 1-16-1 
丸山 ビル 411 f? (03) 461-1848 


% 


Q 


PC- ヨ 000 シ リー ズ 2 プレ イヤ ー ズ ゲーム . 


スタ ー フ ァ イ ア 


ШІ kc 


シン 

マイ コン ・ ゲ ー ム の 本 [1 に 掲載 され た 多 രമ, REM 文 な ども 使っ て いる の で な お , 衛星 と 砲台 の ビー ム 発 射 は , 同じ ж 
4; 

т 
j А 


部 田 俊雄 さん の 作っ た , MZ-80 用 の "STAR ある 程度 わか っ て も ら え る と 思い ます . キー に よっ て 行なわ れ ま す . 
FIRE" を 移植 し た も の で す . と 言っ て も , それ か ら 変 数 な ども , ブログ ラム の 初め どちら か 一 方 の 砲台 が や られ る と LEFT 
MZ の プロ グラ ム を PC 用 に 書き 換え た の で の 方 に まとめ て 書い て 置い た の で , こち ら の 値 が 1 つ ず っ 減っ て いき , 0 に な る と ゲ 
は な く , まだ 私 が パソ コン の べべ の 字 も 知ら の 方 も 見 て いた な だ けれ ば , 大 体 の も の は わ ー ム ・ オ ー バ ー で , 得点 の 高い 方 が 勝ち と 
な か っ た 頃 , 友人 の 家 に 行っ て 遊ん だ と き か っ て も ら え る と 思い ます 。 | な り ま す . 
の 記憶 を 元 に し て 作っ た も の で す . SPE スピ ー ド で す が , ビー ム を 発射 し て か ら 次 に キー 操作 と 得点 の 説明 を し ます . 7 
っ て いる と 思い ます が , その 点 は 我慢 し て 反対 方 向 べ 行く まで , 1 コマ 1 コマ 調べ て ン レイ ヤー 1 の 人 は |Q| で 上 , [| で 下 , [A] 
くだ さい . いる と 遅く な る の で , 障害 物 あ る い は 反対 で FIRE に な り ま す . プレ イヤ ー2 の 人 は 
H7u234-4724*—va27 側 へ 一 気 に 行く (よう に し て あり ます . し か テン ・ キ ー の |*| で 上 , [=] TF, [+] で FIRE 
— し 全体 の スピ ー ド , キー の 効き な どの 点 に に な り ま す . | 
m % | て くだ さい . Dî, その まま 得点 に な り ま す . 敵 衛星 は . 
Кек Ке LY MI NAC BAL ALS EUV MEL AN SEEN AL ALLY SEEN IER EO E 入 し て ある 場合 50 点 で す . 
Кин: р) шү эзел МШШ RR RE NTN UFO (ക. クロ ー バ ー) 12300, エイ リア デ 
M も う 少し 工夫 し て スピ ー ド を 上 げ ശമോ ン (Ф: スペ ー ド ) は 10 点 で す : 
B sí EP ABER രള また , 敵 衛星 の エネ ルギー の 注入 きれ て 
ച きい ね . こ こも も う 一 工夫 . (А) ЖТ, の る ダク タム を ロー ド も し て RUN. き いな いも の は , 限 石 と 同じ で 障害 物 と な b, 
«Имен CULV іе е MAY MIX ну せる と , タイ トル と キー 操作 が 表示 され ま を の まま 流れ て 行き ます . Zu >2 t E < 
Met Yan (നത ന്‌!) T. COE š [RETURN] キー を 押し 続け る ЗЪБ A 411൭൭൪, 
oa. | 167 / 1% боле» と , ゲー ム が 開始 され ます . 
നുണയുക し ば らく する と , 両 ブ ロッ ク の 近く に 衛 യ്യു 
プロ グラ ム は オー ル BASIC な の で , ЖЖ и (F, 4) と 砲台 が 現われ ます . 敵 ブ ロ “у TD; "D. 
する こと が あり ませ ん . プロ グラ ム を 全部 ッ ク (自分 の 砲台 か ら 見 て 遠い 方 ) の 近く Құт JU C tma f MM 
打ち 込ん だ 後 RUN させ て , ゲー ム を 楽し に , 味方 の 衛星 が あり ます . ЫА 
ക്യ മഥ AND TAL, より 時 間 が 短縮 衛星 に は 最初 . エ ネル ギー が 注入 し て あ この ゲー ム は , 説明 を 読め ゆば わか る と 思 
で きる と 思い ます . b, 一 度 発射 する と 一 気 に エ ネル ギー が な いま す が ,。 1 人 で は で きま せん . 2 人 いな 
Күткенде нде нее ене А pe (b š+. もう一度 使い た いと き に は , いと ゲー ム に な ら な い の で す . で すか ら 阪 


WAV ү 
* ツ ロロ グラ バ に つじ ew 味方 の 衛星 ゆめ が け て ビー ム を 発射 し ます . 独 な ユー ザー の 人 は , Ж, Ж, 兄弟 な どい 
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യ്യു な り ま す . を 相手 が いる こと に よっ て 。 か な り エ キサ 
この ズブ ョ ガチ み 緑 3 TORR S a PEER 味方 の 衛星 に エネ ルギー 充 場 ノ イト する こと も 予想 され る の で , キー を 充 
ろう と 思っ て 作っ だ た の で は な く , 最初 は た 分 いた わっ て くだ きい 7 
だ 単に INP な ど , キー に 関す る 命令 を 使っ 最後 に 。 この ゲー ム の MZ-80 版 を や ら せ 
て キャ ラク タ を 上 ド 下 に 動か し て 遊ん て いた だ て くれ た 佐々 君 兄弟 に , 紙面 を 借り て 感謝 
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ム が 作れ る よう な 気 が し て , どう せ 作 る な 参考 文献 
ら 1 人 で 遊べ より も と 思い , この ゲー ム を D 多 部 田 俊雄 : “STAR FIRE”, マイ コン 
作っ た の で す . 初め て の 作 唱 だ っ た の で ゲー ム の 本 [工学 社 
相当 の 時 間 を 使い まし た . 2) PC-8001 活 用 研究 。 工学 社 
中 心 と な る 骨組 の 部 分 に 。 後 で いろ いろ | 
付け 加え だ の で , 大 変 見 苦し いと 思い ます . 


Ш STAR FIRE BASIC リ スト 


C-B の の 1 2-7" 1050 REM * 
മമ REM ж 


1000 REM dd39J 3 9 C 3 9 E € € X ЭЕ ЭЕ ЭЕ € Y ЭЕ € E AE 4 E 4 8 
+ 3C J€ 3€ 3C ЭЕ ЭЕ ЗЕ 3€ € 9€ € 9€ 3€ € ЗЕ ЗЕ ЗЕ ЭЕ 9€ ЭЕ 


1010 REM * 1060 REM * 


1040 REM * SHI TOKUNAGA 
7 OCT. / 85 1070 REM * 


+ 


1020 КЕМ ж ന്‌്‌ ശപിച്ച 


- 1: 
} 


STAR FIRE BASIC リ スト 


1080 КЕМ ദ 
TM UA Sm M] 


1090 СОМ501Е0,25,0,1 

1100 WIDTH4Q,25 М 

1110 PRINTCHRS (12) > 

112 REM ニ ェ ニニ ニニ ニニ ニー :/ ョ キヤ や ッ ティ ========== 
1130 REM ---------- キャ ラクター ---------- 


1140 DIME (40,25) 

1150 Сіг1:С2-2:С5-25:С4-4:С5-5: C676: ビブ = ニア 
1 1 6 の B$=" BEN +CHRS (21) +СНКФ (29) *CHR$ (29) 
*CHR$ (29) + "ШЕШ" +CHRS (31) +CHR%$ (29) +СНЕ% (2 
9) *CHR$ (29) + " ШШШ" { 

1170 S1$-" к'+СНЕ%(51)+СНЕ%(29)+"'"+СНК% ( 
30) +CHR$ (Z0) *CHR$ (29) + "а" 

1180 52%="4"+СНКФ (31) +CHRS (29) +" W" +CHR$ ( 
20) +СНКФ (70) +СНКФ (29) +" 4" 

1190 50%-" "+CHR$ (51) +CHRS (29) +" 
20) +СНКФ (30) +СНКФ (29) +" " 

1200 S53$=" >" +CHRS (31) +СНКФ (29) +" 2" +CHRS ( 
20) +СНКФ മ്മാ +СНЕФ (29) +" ~." 

1210 54%="<"+СНКФ (21) +СНКФ (29) +" s" «CHR$ ( 
20) +CHRS (30) +CHRS (29) +" ^" 


"+СНКФ (C 


кое 


$ 


1730 IFIQ=&HFDTHENIFY1<4THENYA=QELSEIFE1 
Z100THENYA-OELSEYA--1:EA--10: 650701750 
1740 IFIZ=&HFETHENIFY1>22THENYA=ØELSEIFE 
1< 1ØØTHENYA=ØELSEYA=1 : EA=-10 ' 
1750 E1-E1-*EA:GOSUBZ710: LOCATE1,Y1: COLOR 
C6: PRINTSQ$:Y1-Y1*YA: LOCATE1,Y1:PRINTS1$ 
1760 GOTO 1920 


.1770 REM ---------- PLANET 1 FIRE ------ 


1780 IFP1»230RPA-O0GOTO1840ELSEFA-9 

1790 EA-E1/10:1J-227: IFEA«IJTHENIJ-EA 
1800 FORI-31TOIJ: BEEP1:LOCATEI,F1: COLORC 
2: PRINTBM$; : ВЕЕРО: GOSUB2210: NEXTI 

1810 IFF1-Y20RP1-Y2-10RF1-Y2*1THENIFI-36 
THENLOCATES7 , Y2: COLORC2: PRINTSS$%: FORJ=31 
TOI:LOCATEJ ,Pi1:PRINT" "3; :NEXTJ:BEEF1:LOC 
ATES7,Y2:PRINTSOU$: BEEF1: LOCATE1,Y1: PRINT 
50%: ВЕЕР@:Е1=Е 1-70: IFE1 く の THENE 1 = の ELSEE 1 = 
Е1:91=51+Е 1: GOSUB3670: GOSUB2740: GOTO1270 
1820 FORJ-31TOI:LOCATEJ,P1:PRINT" ";:МЕХ 
72:6050В2670:Е1-Е1-(1-21)%10:ІҒЕ1<0ТНЕМЕ 
1-0 ` 


AUN US Yo UI АГ, Ж, 43 эм Фу E S SY ае? 4 PES റ്‌ 
നാ താത്ത 
RE തിഷ്‌ ളമ e AUN уе 

J ex に ў ] › , a ' 4 


225@ К=@ 
2260 IFY1-P1THENR-1:IFIJ^3QTHENIJ-29 
2270 IFY1=F2THENR=1 : IFTJ >8THENIJ=7 
2280 IFY1-U1THENR-i1:IFIJ^UATHENIJ-UA-1 
2290 IFY1-UZ2THENR-71: IFIJ-;UBTHENIJ-UE-1 
2300 IFYi=A1THENR=1 : IF 19 >AATHENIJ=AA-1 
2310 IFY1-2A2THENR-1: IFIJ^ABTHENIJ-AEB-1 
2220 IFYi=M1THENRS=1 : IF IJ *MHTHENIJ=MH-1 
2250 IFY1=M2THENR=1 : IF IJ >MBTHENI J=MB-1 
2240 IFY1=D1THENR=1 : IF IJ *DATHENIJ=DA-1 
2250 IFY1=D2THENR=1 : IF IJ “DBTHENIJ=DBE-1 
2560 
2370 - 
2380 IFB(I, Ү1)=1ТНЕМВ(1, Y1)-0:GOTO1910EL 
SERETURN 

2397); 42" ラ SW 2 


2400 IFR= の THENRETURN 

2410 КЕМ FLANET 2 

2420 IFI-8ANDY1-P2THENIFFB-O0GOTO191Q0ELSE 
LOCATEI,P2:COLORC6: PRINTEO$; : 2-72: РВ=0: 5 


E» 1591 ടമ: 60701910 

`122@ Р1Ф=" К": Р2%="4" ・ 1850 6050В2710:1 ОСАТЕЗ7,Ү2: COLORCS: PRINT PLANET 1 

hi LIN + 1250 ഥമ 52% 2440 COLORCÓ: IFT= ミ の ANDY 1 =F1 THENPA=1 : БОТО 
[LES 1240 BM$-'-— 4 j 1940: МЕМ ニー ビバ テー コー で FIRE ニー カン アー マー で 191 の 

beo Y 1250 REM ---------- ‘LEFT % SCORE RESET - 1850 EA-E1/10:1J-7357: IFEA< IJTHENIJ-EA 2450 REM 

E eM | | ニーーーーーーーー 1860 GOSUE2240: IFR< >02G0TO19%00 2460 IF I=UAANDY 1=U1 THENS1=S1 +30: LOCATEUA 
a: › 1260 LE-5:51-0: 82-0: 605085890: COLORA : PRI 1870 FORI-2TOIJ:BEEF1:LOCATEI,Y1: COLORC2 ,U1:PRINTBOS$; : UA-B* INT (RNDC1) *20) :01=2:6 
beg | NTCHR$ (12) : PRINTBM$ ; : BEEPO: GOSUB2370: NEXTI 0701910 

Yi 1278. REM ーー ニー ニー= ニ ーーー BLOCK DATA --------- 1880 IFY1-Y20RY1-Y2-10RY1-Y241THENIFI»Z26 2470 IF I=UBANDY 1=U2THENS1=S1 +30: LOCATEUB 
XP^ =: ' \ THENLOCATE37 , Y2: COLORC2: PRINTS3$:FORJ-2T ,U2: PRINTBO$; : UB-8* INT (RND (1) *20) :U272: G 
nid. 1280 Ү1=15:Ү2=15:РА=2:РВ=2 d OI:LOCATEJ,Y1:FRINT" ";:NEXTJ: BEEP1:LOCA 

ET 2 1290 B(3,5)-1:B(4,6)-1:B(5,6)z1:B(23,6)-7 TEZ7,Y2:PRINTSOS$:LOCATE1,Y1:PRINTSQO0$: BEE 2 

ң ӨТЕР и 1:B(C354,5) 21: BC 59,6) =1 Р0:Е1-Е1-260:ІҒЕ1<0ОТНЕМЕ1-0ЕІ БЕЕ1-Е1:51- 2490 IF I=AAANDY1=A1THENS1=S1+10:L0CATEAA 
വ. NE 1300 В(2,7)-1:В(4,7)-1:В(5,7)-1:В(22,7)- S1+E1: GOSUB3670: 605085740: 60701270 361: PRINTBO$; : AA=B+INT (RND (1)#2@):А1=2:6 
y mE * 1:B(C354,7)21:B(6 25,7271 1890 60701910 0701910 i 

eI 1210 В(5,8) =1:В (4,8) 21: B(5,8) 21: B (32,8) = 1900 FORI-2TOIJ: BEEP1: LOCATEI ,Y1: COLORC2 2500 IFI-ABANDY1-A2THENS1-81-*10: LOCATEAB 
トー ЕТ 1:B(34,8) 21: BC 55,8) 71 : FRINTBM$; : BEEF の : 605082570: NEXT 1: GOSUB2S ,A2: PRINTBO$; : AB-8* INT (RND (1) #20) : A2=2: 6 
E mei 1520 в(2,12)-1: B(4,12)71: B(5,12)=1 2ВС55, 90 

പിഴ А 12)=1:8(34,12)=1: BS, 12)=1 - 1910 FORJ-2TOI:LOCATEJ,Y1:PRINT" ";:NEXT 

3% CE |1220 B(,12 =1: BO, 13 w13 B(5,13)21:B(332, J: GOSUB3670: E1-E1-(I-2) #10: IFE1«QTHENE17- 2520 IFI-MHANDY1-M1GOTO1910 

a 13)=1:B(34,13)=1:B(35,13)=1 ) o 2520 IFI-MBANDYi1-M2GOTO1910 

9293 1240 BlZ,14)=1:B(4,14)=1:B(5,14)=1:B(33, 1920 GOSUB37 10: LOCATES7 , Y2: COLORCS: PRINT 2540 REM STAR DUST 

et ^. 14221: В (54,14) 21: BC 25,14) =1 52% 2550 IFI=DAANDY1=D1THENLOCATEDA,D1:PRINT 
പ, 1550 В(2,18)-1:В(4,18)-1:В(5,18)-1:В<Х52, 1950 605082590: GOSUB2640 BO$; : Da-8* INT (RND (1) X20) :D172: GOTO1910 
൫ ആല 18)-1:В(24,18)-1:В(25,18)-1 1940 REM amnmammn PLAYER gj itunes 2560 IFI-DBANDY1-D2THENLOCATEDB, D2: PRINT 
32 i 1260 B(3,19)=1:B(4,19)=1:B(5,19)=1:B(33, 1950 REM ---------- SEARCH KEY --------- 80; : DB=8+INT (RND (1) +20) : р2= 2:G0T01910 


2570 RETURN 
2580 REM ========== MDVE 1 ========== 


19)-1:В(24,19)-1:В(25,19)-1 
1960 ІТ-ІМР(1):ҮВ-0:ЕВ-20 


1570 B(3,200)-21:B(4,20) 21: B( 5,20) 21:B(55, 
20)-1:B(34,20)-1:B(25,20) =1 


2500. КЕМ, pares seas PLANET DATA ーーー だ ニー デマ 
1290 P1-2INT(RND(1)*24*-1):P2-2INT (КМр (1) #2, 
4+1) ! 

ЖАМ” REM. ptm ы реу», UFO DATA ---------- 
1410 UA=9+INT (RND (1) +20) : 01=2+ INT (КМО (1) 
#22) 


1420 UB=9+INT (RND (1) #20) : U2=2+INT (RND ( 1) 
#22) 

1430 REM ---------- ALIEN DATA --------- 
1440 AA=9+INT (RND (1) *20) : 1=2+TNT(RND(1 ) 
ж22) | 

450 AB=9+INT (RND (1) #20) : А2=2+1МТ (RND (1) 
*22) 

1460 REM ------ ---- METEO DATA --------- 


1470 MH=9+INT(RND (1) #20): М1=2+ ІМТ (RND (1) 
1480 MB=9+INT(RND (1) #20) : М2=2+ ІМТ (КМр (1) 


LONE NM. STAR DUST DATA ----- 


1500 DA=9+INT (RND (1) #20) : D122* INT (RND ( 1) 
1510 DB=9+INT(RND( 1 ) *2 の ) :D2=2+INT (RND (1 ) 
|1520 REM ---------- МАКЕ SCREEN -------- 


1520 LINE(1,2)-(27,24) ," 
1540 65050вВ2760 

1550 GOSUB3710 

1560 6050870 

1570 _ОСАТЕЗ, 6: CDLORC4: PRINTB$:LOCATEZ, : 
2: PRINTB$:LOCATEZ,18: PRINTE$:LOCATE33,6 
PRINTB$:LOCATES3,12: PRIMIBSILOCATESS, 19 
FRINTE$ 

1280 നിടെ WAIT 一 ご = マーー ビ ーー と 

1590 FORI-QTO100:NEXTI 

1600 LOCATE165,13: COLORC7: PRINT"READY '"'; 
:FORI-OTO1000:NEXTI 

1610 Е1-1000:Е2-1000 

1620 GOSUBZ710 

1650 LOCATE16,13:PRINT" TE 

1640 КЕМ ---------- GAME START. ടട 
1650 6050825950: GOSUB3 
3370 

1660 FORI-OTO01:BEEP1:FORJ-OTQSO: NEXTJ: BE 
ЕР@: NEXTI 

1670 LOCATE1,Y1: OLORCó: PRINTS1$ 
1680 LOCATEZ27,Y2: COLORCS: РКІМТ52% 
1690 REM ========== PLAYER 1 ===== 
1700 БЕМ ---------- SEARCH KEY --------- 


"BF 


20: GOSUB2640: GOSUB 


ニニ ニニ = 


1710 PRR LSNA IESE IATL ESSET PE 
ЕА-20 
1720 IFIA-tHFDGOTO1770 


1970 IFIT-&HF7GOTO2020 З 
1980 IFIT=&HFBTHENIFY2 く 4THENYE= の ELSE IFE2 


 «100THENYB-OELSEYB--1:EB-—10: GOTO2000 


1990 IFIT=&HEFTHENIFY つ >22THENYB= の ELSE IFE 
2< 1 の の THENYB= の ELSEYH= 1: EE=ー1 の 


2000 E2=E2+E 日 : GOSUB3710: LOCATE37,Y2: COLO 
RCS: РКІМТ50%: Y2=Y2+YB: LOCATE37,Y2: PRINTS 


2010 GOTO2180 ` 
2020 КЕМ ---------- PLANET 2 Е1ВЕ ------ 


2050 IFP2 >23DRFE= の GUTD2 の 9 の ELSEPE= の 

2040 EB-E2/10:1J-727: IFEBXIJTHENIJ-IJ- EBE 
LSEIJ-1 

2050 FORI-7TOIJSTEF-1:BEEP1:LOCATEI,P2:C 
OLORC2:PRINTEM$; : ВЕЕРО: 605082940: NEXTI 
2060 IFP2-Y10RP2-Y1-10RF2-2Y1*1THENIFI«2T 
HENLOCATE1,Y1: COLORC2: РКІМТ54%; : FORJ-7TO 
ISTEP-1:LOCATEJ , P2: PRINT" "S: NEXTJ: ВЕЕР 1 
:LOCATE1,Y1: PRINTSO$: LOCATE37,Y2:PRINTSO 
$: ВЕЕР: E2-E2-70: IFE つ く の THENE つ = の ELSEE つ = ビラ 
:S2=S2+E2: 60SUB3670: 605082740: 50701270 
2070 FORJ-7TOISTEP-1:LOCATEJ,P2:PRINT" " 


ji: NEXTJ: GOSUB2670: Е2=Е2- (7-І) #10: IFE2 く の T 


HENE2= の 1 
2080 GOSUBZ710:LOCATE1,Y1: CDLDRC6: PRINTS 
1% 

2090 КЕМ ---------- FIRE ---------- 

2100 ЕВ-Е2/10:12-27:ІҒЕВ<ІЗТНЕМ12-12-ЕВЕ 
LSEIJ-1 


2110 606082970: IFR« »0G0TO2150 
2120 FORI-S&6TOIJSTEF-1:BEEF1:LOCATEI ,Y2: 
COLORC2: PRINTBM$; : BEEF の : BDSUB さ 1 の の : NEXT I 
2130 IFY2-Y10RY2-5Y1-10RY22Y1*1THENIFI«2T 
HENLOCATE 1 , Y1: COLORC2: PRINTS4$; : FORJ-36T 
OISTEP-1:LOCATEJ,Y2:PRINT" "::NEXTJ:BEEF 
1:LOCATE1,Y1:PRINTSO$: LOCATE37 。Y2 PRINTS 
0%: BEEFO: E2-E2- 260: TFE2< の THENE2= の ELSEE2= 
E2:92-82«E2: 6050835670: GOSUB3740: 650701270 
2140 GOTO2160 

2150 FORI-Z&éTOIJSTEP-1:BEEP1:LOCATEI,Y2: 
COLORC2: PRINTBM$; : ВЕЕРО: GOSUBZ100: NEXTI: 
GOSUBZ120 

2160 FORJ-36TOISTEP-1:LOCATEJ , Y2: PRINT" 
"$ :NEXTJ: 605085670: E2-E2- (36-1) «10: IFE2« 
ФТНЕМЕ2=0 

2170 GOSUB371Ø:LOCATE1 , Y1: СО ОКС: PRINTS 
1% 

2180 605085520: GOSUB3370 

2190 60701670 

2200 КЕМ ========== PLANET 1 FIRE ====== 
== ==: 

2210 КЕМ ---------- | BLOCK ---------- 
2220 IFB( 1 。P1)=1THENB(T ,F1) =0: GOTO1820EL 
SERETURN 

2230 REM ========== 
2240 КЕМ ---------- ショ ウ カ "イフ トリ 3 VAN 1 


PLAYER 1 FIRE ====== 


ニー ニー ニーーー ニ ーーー 


PLANET 1 
2600 LOCATEZO,P1: PRINT" ";:1ЕР1>25ТНЕМР1 
=2 

2610 IFPA-OTHENLOCATE30, Р1+1: 0006൧4: PRI 
NTF2$;:GO0TO26520 

2620 LOCATEZO,P1-*1: СО ОКС: PRINTP1$; 
2630 PI-P141: RETURN 


2650 LOCATEUA,U1:PRINT" "; 

2660 UA=UA-2+INT (RND ( 1 ) ж) 

2670 1ЕПА<9ТНЕМИА=9Е! $Е1ЕПА>29ТНЕМПА=29 
2680 U1=U1+1 

2590 IFU1:24THENU1 =2: UA=9+INT (RND (1) #20) 
2700 LOCATEUA,U1:COLORCI:PRINTUS$; 0 
2710 REM ALIEN 1 

2720 LOCATEAA,A1:PRINT" "; 

2720 AA=AA-1+INT (RND (1) #4) 

2740 1ЕАА<9ТНЕМАА=9Е1.5Е1ЕАА>29ТНЕМАА=29 
2750 А1=А1+1 VAR 
2760 IFA1»24THENA1-72:46-9-*INT (RND (1) *20) 
2770 LOCATEAA,41: COLORC2: FRINTA$; 

7780 REM METEO 1 

2790 LOCATEMH,M1:PRINT" "; 

2800 МН=МН- 1 +ІМТ (RND (1) #4) 

2810 IFMH<9THENMH=9ELSETFMH: つ 9THENMH=29 
2820 Mi=Mi+1 

2820 IFM1:24THENM1 =2: MH=9+INT (RND (1) #20) 
2840 LOCATEMH, M1 : COLORCZ: PRINTMS 3 

2850 REM - STAR DUST 1 

2860 LOCATEDA,D1:PRINT" "; 

2870 DA=DA-2+INT (RND (1) *6) 

2880 IFDAc:QTHENDA-9ELSEIFDA;29THENDA-29 
2890 D1=D1+1 

2900 IFD1:24THEND 1 =2: DA=9+INT (RND (1) #20) 
2910 LOCATEDA, D1 : COLORC4: PRINTDS: 

2920 RETURN 
2930 REM 


2940 REM Ç 
2950 IFEBE(I,F2)=1THENB(I,F2)=0@:GOTO20@70EL 
SERETURN | 


PLANET 2 FIRE 


PLAYER 2 FIRE 


227° 172°" Э 


vy wd 


IFY2=P1THENR=1 : IFIJ<30THENIJ=31 
IFY2=P2THENR=1: IF1J<8THENIJ=9 
IFY2-U1THENR-1: IFIJZUATHENIJ-UA-*1 
IFY2=U2THENR=1: IFIJE£UBETHENIJ-UB-*1 
IFY2=A1 THENR=1: IFIJ<AATHENIJ=AA+1 
IFY2-A2THENR-71: IF IJ<ABTHENIJ=AB+1 
IFY2=M1 THENR=1 : IF IJ<MHTHENI J=MH+1 
IFY2=M2THENR=1 : IF IJ<MBTHENIJ=ME+1 
IFY2-D1THENR-1: IFIJZDATHENIJ-DA*1 
IFY2-D2THENR-1: IFIJ<DBTHENIJ= DB+ 1 
RETURN 


P PiO1i 月 号 を 見 て 。 私 は た い へ ん ぴっ くり し て し まい まし た . 
olim авес ん で す . その 他 に も アニ メ の こよ な ど 数 年 前 に は 考え られ な か っ た 
а ) ッ ト に よく 顔 を 出す 別名 сй ы ki 私 の こと] 


ミケ ッ ト の こ と や Nakkey ふ ん の お 絵描き ュー ナー な ど 、 まき に 私 の 酸味 が | 
S tt കന്യ Te a 


Ld 


X 


本 当 は マシ ン 語 や BASIC を 完 
な し て いる 
L Талу; 
的 に 話し て も ら っ て , 
ン 語 を 知ら な い 人 の 参考 に し よう と 4』 
作っ だ コー ナ 
記事 内 容 が 


(ロー ディ スト に な り た 


2110 IFB(1 。Y2)=1THENE (1 。Y2) =@: GODTH216 の EL 
SERETURN 
мао“ イフ トリ 3 シラ ベル 2 
313 IFR= ウ THENRETURN 
3140 REM ---------- PLANET 1 
5150 IFI=30ANDY2=P1 ТНЕМІҒРА=060Т02120Е1 5 
Е ОСАТЕІ,Р1: 0006൧൦: PRINTBOS; :P1=2: FA=Q: 
52-52%50:650702160 
5160 REM ---------- PLANET 2 
5170 COLORCó: IF І =ВАМрҮ2=Р2ТНЕМРВ=1 : GOTO2 
160 
3180 REM ---------- UFO ---------- 
2190 IF I=UAANDY2=U1 THENS2=S2+30: LOCATEUA 
,U1: PRINTEOS; : JA-8- INT (RND (1) #20) :U1=2:6 
MASA e 
200 IFI-UBANDY2-UZTHENS2-582-4720: LOCATEUB 
LU2:PRINTBOS; : UB- 日 +TNT (RND (1) #20) :U2=2: G 
0102160 
2210 КЕМ ---------- 
2220 IF I=AAANDY2=A1 THENS2=S2+1 0: LOCATEAA 
sAl:PRINTBOS; : AA=8+INT (RND (1) #20) :A1=2:6 
0702160 
5220 IFI-ABANDY2-A2THENS2-82-*10: LOCATEAB 
„А2: РКІМТВОФ; : AB-8* INT (RND (1) *20) :A2=2: 6 
0702120 
2240 
2250 IF I=MHANDY2=M1G0TO2160 
2200 IF I=MBANDY2=M2GOTO2160 
3270 STER DUST 
3280 IF I=DAANDY2=D1 THENLOCATEDA, D1 : PRINT 
80; : DA=8+INT (RND (1) #20) :D1=2: GOTO21 60 
IF I=DBANDY2=D2THENLOCATEDE , D2: PRINT 
: DB-8 INT (RND (1) #20) : D2=2: GOTO2160 


LUCATEB ,P2: PRINT" "s: IFP2»23THENP2- 


IFFB-OTHENLOCATEB ,P2*1: COLORCA4: PRIN 
:GOTOX360 
(ОСАТЕВ,Р2%1: COLORCS: PRINTF2%; 
Р2=Р2+1: RETURN 


LOCATEUB,U2:FRINT" "; 

UB-UB- 2+ INT (RND (1) жө) 
IFUB«X9THENUB-Z9ELSEIFUB?^29THENUB-29 
U2-U2-*1 

IFU2724THENU2-2: UBz9* INT (RND(1) #20) 
LOCATEUB , U2: COLORC1 : PRINTUS; 


LOCATEAB,A2:FPRINT" "; 
АВ=АВ—-1+1МТ (RND (1) +4) 

IFAE 9THENAB=9ELSEIFAB29THENAB=29 
А2-А2%1 
IFA2>24THENA2=2: AB=9+INT (RND C1) #20) 
_ОСАТЕАВ , A2: COLORC2: РКІМТАФ; 


ラス ト の 常連 で すね . 
DARIN TZ 
人 に どん な 風 に し て それ を 理解 
っ か け の よう な も の を 体験 
277 BASIC や マシ 
思っ て 
ー だ っ だ の で す が …。 最初 の 
この 意図 と 違っ て いた の と , ik 


S АЕ АСЕ. А 


その き 


上 票 の 原稿 の 書き 方 が 悪かっ だ よう で すね . 
反省 …. 
さき て, 今回 の 投票 で は 表 の 人 た だ た ちの 名 前 


が 挙げ られ て いま し た . 投票 数 は を そん な に 
多く な か っ た の で 特に 表記 し ませ ん . た だ 
大 多数 は 上 の 4 名 が 占め て いて , あと は 大 
きく 離れ て 少数 だ と いう こと は 言っ て お き 


- い Robin ) 


д, ЖУКСА” 


Ж) Т 


; LE SEE A ЖАҒЫ 
liege: ന്ഥ 


МЕТЕО 2 
LOCATEMB,M2:PRINT" "; 
MB-MB- LINT (RND C1) жа) 
IFMB«X9THENMB-Z9ELSEIFMB:.;29THENMB-29 
[12511241 
ІЕМ2>24ТНЕММ2-2:МВ-9<-ІМТ(ЕМр(1) *20) 
LOCATEMB , M2: COLORC35: PRINTM$; 

STAR DUST 
LOCATEDB,D2:FPRINT" "; 
DB-DB-2*INT (RND (1) *5) 
IFDBZ9THENDB-S9ELSEIFDB;29THENDB-29 
D2- D2+1 
IFD2»24THEND2-2: DB=9+INT (RND (1) ж20) 
LOCATEDB , D2: COLORCA: PRINTDS; 


SCREEN ========== 
May 9 TAA 


LINE (0,2)- (0,24) ,"W",C7 
LINE(38,2)-(28,24) ,"W",C7 


ENERGY & SCORE 


LOCATE Ø, 1 :COLORC6: FRINTUSING"E=### 
###";E1;:PRINTUSING" S=######";51;:COLO 
RCS:PRINTUSING" : S=######";S2;:PRINTUSI 
NG" Е=######";ЕЗЛ 
2730 
5740 
2750 
3760 
5770 LOCATEO,0:COLORC6:PRINT"PLAYER 1 

"3 :COLORC7:PRINT"LEFT "iLE;:COLORCS 
: PRINT" PLAYER 2"; 
3780 IFLE< > の THENRETURN 

GAME OVER 

3800 LOCATEO,0:COLORC6:PRINT"PLAYER 1 

":S:COLORC7:PRINT"LEFT ";LE;:COLORCS 
: PRINT" PLAYER 2"; 
2810 GOSUBZ710:LOCATE15, 
ER"; 
2820 IFS1 >S2THENLOCATE12, 14: COLORCó: PRIN 
T"PLAYER 1 WIN '";:G0T02850 
3830 IFS2»S1THENLOCATE12,14: COLORCS: PRIN 
T"PLAYER 2 WIN !";:б0Т02850 
3840 LOCATE14,14: COLORC7: PRINT"NO WINNER 

pna, 

3850 FORI=0TO1000: NEXTI 
2860 LOCATE15,15:PRINT" 
E12,14:PRINT" 
2870 50701250 
3880 REM 


3:PRINT"GAME OV 


"ssLDCAT 


3900 PRINTCHR$(12):FORC-7TO1STEP-1: COLOR 
C: PRINTCHR$ (12) : GOSUBZ930: FORI-1TOB: FORJ 
= の TU24:LINEJ 。2 NEXTJ: IFINKEY$-CHR$ (13) TH 
ENRETURNELSEFORJ-OTO24:LINEJ,1:NEXTJ:NEX 


の フル リー トー ケタ は 
そ の 


2൭ ൬ OCS 
SOLVALOU き ん を 了 予定 し て ます が 
次 か ら PiO な 人 に 選ば れ た 方 に は , 編集 部 


か ら 連絡 が 行き ます が , その と き は よろ し 
《 、 

内 容 は , プロ グラ ム で き な い 人 も いる の で , 
自己 紹介 や 近況 に な る で し ょ う . 

と いう こと で 。 次 号 以 降 の フリ ー ト ー ク 
も PAL で / 


>A 1 . , : 
D b 4 г л š a K 
3 rz, Tu m < も 3 Ў 


оо 


ОТАР FIRE BASIC リ スト 


ТІ: МЕХТС: 60705900 
2910 

3920 

3930 LOCATEO,0 
2940 FRINT" 


PRINT" 


3960 PRINT" P d ll 
Іі ғ. "ұ 
2970 РБІМТ" 


人 ഗത്ത്‌ ESRF А 
” ғғ 


 — ғ. Ант” ഞ്ഞ 


PRINT" | 


PRINT" 


PRINT" | ub С” 


PRINT" 


4020 PRINT" ا‎ L^ 

tem mi 

4020 PRINT" 

mv - "i 

4040 FRINT" P d L 
и. " 


4050 PRINT" 
CM "j 
4060 PRINT" 11 > Fd EI 

PRINT" 7 ഷി aient 


PRINT" 


=s УУ £o ғғ 
Ill L 

ИШ „| 4" рызы е 
ғ ж し の 


ғ ж” Ln 


Ф” ғ 4 ക്‌.” 


KEY FUNCTION ——— 


FRINT" 


FRINT" جسم‎ 


PRINT" 
PRINT" 


PRINT" 


PRINT" 


PRINT" 


"eo 
Ы 


РКІМТ" 


PRINT" 


“. 


RETURN 


PLAYER 1 PLAY 


Io Ett Р 


ст 


PRESS RETURN KEY 


Tom vol 1 БАЁ 


RA 


アッ プル ・ ベ ア 
火星 鹿 

スタ ン ハ ン セ ン 
不協和音 

Art Software 
猫 同志 社 
NASA 
伝説 阪神 


qs К den se í 
+ ГА പ % Y Ae vex t е 
PO due" s, Won туу RENT ER DEN eee, 


Lo Y. с Ly 


"ルナ ー シ テ ィ SOS/" は , I/O 8198 
4 月 号 て 発表 され て 以来 多く の 機種 に 移植 
され て きま し た . 今回 は X 1 に 移植 し まし 
た の て 発表 し ます . 

圏 プ ログ ラム ・ イ ン フ ォ メ ーション 


マシ ン 語 14A0~2CC4 
スタ ー ト 1ABI 


も うす こし オリ ジ ナ ル な 所 が あれ ば も 
っ と よく な る と 思う の て す が ? (О) 


モニ タ の M ユ コマ ンド を 使い 。 リス ト を よ 
€ 見 て 間違い の な いよ うに 入力 し て 〈 く だ き 
с, そし て 入力 が 終わ っ だ たら, РіО "84 年 8 


月 号 に 掲載 され た だ チェック サム ・ プ "ログ ラ 


ム を 使っ て チェ ッ ク ・ サ ム の 値 を 確認 し , 
間違い が な けれ ば 5S コ マン ド で プログラム 
ETRE STL TUTE: 


まず BASIC (CZ-8CB0l) を ロー ド し , 
МОМ | RETURN| と し て モニ タ に 移り ます . 
次 に カモ セット に 先 の テー プ を セ モット し て 
LIRETURN| と し て ロー ド し , ロー ド が 終わ 
っ た ら @G1AB1|RETURN | と すれ ば ゲー ム が 
XNNULZT, 


ビー ム 船 は テン ・ キ ー の [4| と [6], また は 
ジョ イス ティ ッ ク て で 左右 に 移動 し [SPACE] 
キー か 


%; 

ゲー ム を スタ ー ト する と , まず 上 空 に ト 
プシ ダー ステ ーション が 出現 し ます . この 
ステ ーション は 中 央 の 紫色 の 部 分 に 4 発 ビ 
ー ム を 受け る と 分 裂 し て 2 機 の ト プ シ ダー 
UFO に な り ま す . そし て UFO は 胴体 に 3 発 
の ビー ム を 受け る と 2 匹 の トブ プシ ダー に , 
ト デ シ ダー は ビー ム 2 発 で トブ シン 2 匹 に 
ENR STN YET DLs UZAY AL 
は 分 裂 能 力 が な く ビ ー ム を 1 発 受 ける と ト 
ポン に 変化 し で 砂 下 し て きま す 。. 

な お 。 ル ナー シテ ィ の 都市 は バリ ア に よ 
っ て 守ら れ て いま す が 。 ト ボン や ミサ イル 
が 当 だ る を と 容 が あい て し まい ます . で リア 
が 穴 ど だ ら け に な る と ト ボ ポン や ミサ イル で 都 
市 が 破壊 され て し まう の で , バリ ア を 張り 
か えて くだ さい . バリ ア は テン ・ キ ー の [8 
か ジョ イス ティ ッ ク を 上 に 倒す こと に より , 
画面 右 下 に 表示 され て いる 回 数 分 どけ 張り 
SX ൭.൩. 6 が で あま す 。 

を し で ゲー ム は 。 1 面 グ リア す を と 残っ 
て いる 都市 の 数 X 面 数 X50 点 が 加算 され , 
5,000 点 で ビー ム 船 が 1 機 増 えれ. 8 つの 都市 
か ビー ム 船 が す で て 破壊 きれ る と ゲー ム ・ 
アウ ーー WT. 


また だ た, 3 ・6・10 面 で 出現 する トブ シダ 


ー ス テー ショ ン の 数 が 増え 。 15 面 の から は ト 


ポン や ミサ イル の スピ ー ド が 速く な り ま す . 


ブロ グラ ム は すべ で て マシ ン 語 (%14А0-- 
$2CC4) “ദ, 表 に 主 な ルー チン の アド レン 
ス ・ マ ッ プ を 書い て お きま す . 


最後 に 


t лі 
ボー ナス 時 と ゲー ム ・ オ ー バ ー 時 の 音楽 


i£, PiO 9 ・10 月 号 の MIKAKO A ¿th 


。 | 音楽 デー タ ・ セ ッ ト 
音楽 演奏 
10 進 出力 | 
i メッセージ プリント 
| 10 進 プリ ント 

STICK 
| STRIG 
パレ ッ ト ・ セ ッ ト 
タイ マー 
PSG デ ー タ ・ セ ッ ト 
| ゲー ム ・ ス ター ト 
ビー ム 船 移動 Š 
ステ ーション ,UFO, ト プシ ダー 移動 
ト プシ ン 移 動 
PRY, ミサ イル 移動 

ミサ イル 発生 
ビー ム 発 射 
ビー ム 移 動 
都市 や られ た か 調べ る 
| バリ ア 張 り 替 え 
バッ ク の 星 の 色 を 変え る 
一 面 ク リア 
ビー ム 船 全滅 (ゲー ム ・ オ ー バ ー) 
2555 都市 すべ て 破壊 (ゲー ム ・ オ ー ペ バー ) 


マズ イノ 最後 の 都市 が … 


田 彰 久 る ん の も の を 使わ せ て いた だ きま し か た. 

あり が と ラテ ご ざい まし た .。 

3 参考 文献 

1) ŻFIN “LUNAR CITY SOS", 
L/O, "81 年 4 月 号 

2) PiO^*—» (ミュ ー ジ ッ ク )。 РІО, 
844- 9, 108% 


ルナ ー シ テ ィ SOS マシ ン 語 リス ト uut 


>» Х ч 
E 


ед ъф "T. പാച്ച്‌ o» Са 
хе ERSTE ае КЪК 


cases 


a ` 
E d Мм? ന്റ്‌] を aran, 
В Fo. — た hs "e hh Р |) T * 

ok Mw, “А » 2 


て 
こと 529 ы УЫ, зу 1 ` > С 
പറ്‌ AAF ATU aya: ബന്‌; М, 


私 は PC-1500 ク ラブ の 会 員 で す . 僕 は PiO 創 刊 じ らい ずっ と 買っ て いま す . 5120, PiO は 他 の 雑誌 より いい し か し 、 初 選者 で は わか り に 
l い 機 械 語 の プロ グラ ム が 多い の で , マシ ン 語 入門 の 欄 を 作る と も っ と よく な る と 思い ます (YU, ポケ コン の 方 も ). 


(PC-1500 フ ァ ン クラ ブ 会 員 N.T.) 


Ж k: 
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22A9 
22B9 
22C9 
22D9 
22E9 
22F0 . 
2399 
2318 
2320 
2338 
2348 
2350 Có 
,2360 90. 


、 ドー モ 初 め ま し て , GALATT で す . By the way, いま パン トマ イム (知る 人 ぞ 知 る ) СШ Th ます . жел гис, な ん て いち | 
いっ j っ ュー」 な ん て いわ ゎ ん 

だ さい . で きる よう に な れ ば 楽し いで す よ 。 女の子 の 前 で や る 結構 受け て る し ね . Р5.1 PLANET TAUERCCIDEONS E €+ 79 : 
DF の 数 が 3 Кора iamen. d вд 2 ыы апа | 107 A KaR (無理 か A ý 


4 Jp) d ” d б“ М w 
, 4 ` at * 4 ` , * 
, Р 4 - デット -+ 
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ルナ ー シ テ ィ SOS マシ ン 語 リス ト 


Sum 62 81 44 DA 82 5E 38 05 02 04 87 1F ВЕ E? മെ 2B :B3 


2810 83 83 30 18 10 DB FB る る CB 80 А2 C? óA 24 04 00 :67 
2820 34 32 4D 10 10 DB FB る る СВ 99 ^2 өе 00 80 BO 7F :2B 
2830 AB 08 08 19 32 42 44 00 SC Са 27 800 08 80 ве 7F :65 
2840 AO өө DG өө өе өе өе өв өе өе ве ва CC :Е7 


СОСО 


V » ആ X5 TUN 
Aw ر‎ da AAS 4 
^ Ne. ed WIA инин 84001 


-LAB i pg 12 谷 に オー プン , 


dá EFM Z リー ズ の 専門 店 、FM-LAB の LAB は 最高 の 場所 と 言え を る で し ょ う . を その他 に は , 店 内 の 中 心 ス ペー ス を 占め る, 
第 一 号 店 が , 下谷 の パソコン ショ ッ プ 「 ソ 同店 の 社長 林 勝 き さん に よる と , LAB お 買得 商品 コー ナー で し ょ 2 う . 本 当 に お 買 


フト クリ エイ t の 一 階 例 ス ペー ス を 使っ | を 訪れ る お 客 さ ん は , や は り 青 山 と いう 場 | 得 品 ば か り で , 普通 は 228.000 円 する FM- 
て ォ オー プン し まし た . 所 柄 が か が ら か 。 ビ ジネス マン が 中 心 で , 5 8 が な ん と 45.000 円 で 売ら れ て いた b, FM- 
展示 品 の 中 で まず 目 に つく の が 「OM- | と は FM ファ ン の 人 が 遠く か ら も 駆け つけ 7 が 65,000 円 で 並ん で いま し た た . 
NINET( オ ム ニ ネ ッ ト )」 と 呼ば れる FM シ | て くる が , と の こと で す . FM シリ ー ズ に 興味 の ある 人 は ぜひ この 
リー ズ に よる LAN( ロ ー カ ル エ リア ・ ネ ッ 当然 , お 客 き ん か ら の 質問 も ハー ド ・ ソ ツ | FM-LAB 第 一 号 店 を 訪れ て みて くだ さる 


トワ ー ク ) で す . 一般 の パソ コン ショ ッ プ で | フト と も に 専門 的 な 事 に 集中 し が ち で す が ,| Жы, FM- ビ ジネス ・ デ モ の 12 月 以降 の 
店 内 に LAN を 設け て いる と ころ は , まず な | この FM-LAB な ら 自 信 を も っ て それ ら の | 予定 は 以下 の 通り で す . 


いで し ょ う .。 そこ は きる す が に FM 専門 店 , 質問 に お 答え で きる と の こと で す . 12/21 漢字 実務 ソフ ト 

FM- 11 BS 42, プリ ンタ , ハ ー ド ディ ос, ソフ トウ ェ ア に つい て は , 毎週 エー ビー Zw» 
スク ・ ド ライ ブ を 中 心 に 構成 きれ て いる を | 金曜 日 の 午後 5 時 半 か ら 7 時 半 ま で て , いろ い 1/11 ABC-«dBASE ログ 
の LAN で 。 ゎぉ 客 さ きん の 希望 が あれ ば , すぐ | ろ な ソン フト ハ ウス か ら イ ンス トラ クタ ー を 1/18 NOA 110 

に 電子 メー ル な どの 実演 を 行なっ て 見 せ て | HOT, ビジ ネス ・ ソ フト を 中 心 と し た デ シス テム ・ ヤ マト 
くれ ます . モン スト レー ショ ン 「FM- ビ ジネス ・ デ 1⁄2 財務 il マイ バウ ム 


ょ た 。FM- 11 AD 2 台 と FN- 7 #7 | モ 」 を 行なっ て いま す . これ は , EIA | 《 問 い 合わ せ 先 〉 
イヤ レス ・ モ デム で 接続 し 、OS- 9 に よる | に 大 変 好評 で ある ば か りか お 客 き ん の 反 | ソフ トク リエ イト 内 FM- し AB 
TSS( タ イム シェ アリ ング ・ シ ステ ム ) の 実 | റെ, ЯУ?Р ウェ ア の 人 気 具合 が 一 目 で | $9150 渋谷 区 渋谷 1-12-7 三 和 渋谷 ビル 
演 も 行なわ れ て いま す . 最近 な に か と 話題 | わか る の で 林 る ん だ たち に も いい 勉強 に な る | fr(03)486-0871 
に な る LAN ょ OS の 実物 を 見 た い 人 に は , こ | そう で す . 
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2100 年 9 月 4 日 , 地球 防衛 軍 本 部 に アス 
テロ イド ・ ベ ルト て 生物 らし きも の が 多数 
確認 され た と いう 情報 が 入っ た . 

そこ で , すぐ に 俺 は 仲間 4 人 と 共に アス 
テロ イド ・ ベ ルト に 急行 し た が , 到着 と 同 
| 時 に 激しい ショ ッ ク を 受け た . 宇宙 空間 を 
見 る と , そこ に は SPACE CRAB ОЖЖ 
が 待ち 構え て いた . や つら は 異 星人 が 侵略 
用 に 作り だ し た も の で ある . 

この 場 で て 全 減 き せな けれ ば , 数 時 間 後 に 
は 地球 は 占領 され て し まう だ ろう . 幸い こ 
の 戦闘 機 に は 最近 完成 し た ば か り の 超 高 性 
能 ミ サイ ル が 塔 載 し て ある . 俺 達 は 敵 の 中 
央 に 突入 し て いっ た . 

HTN TL AYIA TY IA 


マシ ン 語 9000—9DFD 
スタ ー ト 9000 

ғ 

うっ っ 


D 


オリ ジ ナ ル 性 が も う 少 し あれ ば , も 
うす こし 評価 び が よく な っ た ん で す 
». (О) 


入力 方 流 


id, モニ タ の M ユ コマ ンド を 使っ て リス 


ト を よく 〈 く 見 な が ら 間 違い の な いよ うに プロ 
ダグ ダラム を 入力 し ます . 

次 に , PiO8 月 号 に 掲載 され て いる チェ 
ッ ク サ ム ・ ブ ログラム を 使っ つて チェ ッ ク 
サム の 値 を 調べ で . 入力 ミス が な いよ うな 
GIZ, 

#5 

FILE NAME : ASTEROID CRAB 

S-ADR. $9000 

E-ADR. $9DFD 

J-ADR. $9000 
と し て 。 一 応 テ ー プ に プロ グラ ッ メ 
AE Е 47.൭൨, 


9000 番 地 に ジャ ンプ させ る と ゲー ム が 始 


まり ます . この ゲー ム は CRAB と アス テロ 
イド を 選 け な が ら , ひたすら 自 機 の ミサ イ 


ゝ を セー プ 


[ à (O) 
- Г. O A TAR 
а, Мы En К 
4 6 レー же ы 
к айы 


僕 は PC-1261 を 持っ て いま T. 編集 部 の 皆さん , 
僕 は 付け だ 方 が いい ыж SOID- IARE 


Зы wa 
/ fk y r; КЛИ д! Y TT 
iUc o mv И 
A атым ы vd ia 


| タイ トル 画面 の 文字 

初期 画面 の 文字 

1 面 終了 時 の 文字 

GIVE UP! の 文字 

ゲー ム ・ オ ー バ ー の 文字 

各 面 の バタ ー ン (WAIT, CRABE è, アス テ 
| ロイ ド の 速 さと 発生 幸 ) 

グラ フィ ッ ク ・ パ ター ン 

MUSIC DATA 

乱数 DATA 


アス テロ イド 仮想 画面 
CRAB の 現在 位置 


ル で CRAB を 破壊 する と いう も の で す . 

自 機 の 操作 は , [4| キ ー で 左 , [6] キー で 
右 に 移動 し , [SPACE| キー で ミサ イル を 発射 

(押し 続け て いれ ば ミサ イル は 出 続け ます ) 
LE. 

57218512, ミサ イル が CRAB の どの 
位置 に 当 だ っ だ かと, その と き の 高 き (Ж 
2) に よる て 決ま か ます : 

そし て ゲー ム は , CRAB を 50 匹 破壊 す る 
と 1 面 ク リア と な り , 20 面 クリ ア す る と 
IVE UP! と な り ま す . し か し 途中 で 自 機 が 
TESTOR LAS ETL ж e 
に な り ま す 。 

жо, ゲー ム を 止め た いと き は |BREAK 
キー を 押せ ば モニ タ に 戻り ます . 


フロ グラ ム の 説明 
3521-7 K LA vy”, 表 3 に デー タ 
リア の 説明 。 表 4 に ワー ク ・ エ リア の 
説明 を 示し ます の で , 詳し いこ と は 各自 で 


う 思 いま すか ? 


E Fe, s 
caci റ്‌ 


к. PN "í 
У CA n С D 
MSS 9 a ena th 2 FE e Wo КЕ К; eur 23 сла? xut. 


TXTUM-k.227 


ASTEROID 


9-49. 


初期 設定 
メイ ン ・ ル ー チ ン 
SHIP 移 動 
ミサ イル 移動 
CRAB 移 動 
アス テロ イド 移動 
| 1 面 終了 処理 
` | GIVE UP! 処 理 
| SHIP 爆 発 処 理 
| GAME OVER 処理 
d キー 入力 処理 
SHIP と CRAB が 衝突 し た か の 判定 
| SHIP と アス テロ イド が 衝突 し た か の 判定 
ミサ イル と CRAB が 衝突 し た か の 判定 と 処理 
ミサ イル と アス テロ イド が 衝突 し た か の 判定 と 処理 ` 
16 進 を 10 進 に し て 表示 1 (6 行 ) 
16 進 を 10 進 に し て 表示 2 (2%) 
| グラ フィ ッ ク 表 示 1 (16x24) 
| グラ フィ ッ ク 表 示 2 (8х8) 
乱数 発生 
アス テロ イド の 現在 位置 
アス テロ イド の 前 の 位置 
SHIP の 現在 位置 
505| SHIP の 前 の 位置 
ミサ イル が 出現 し て いる か の フラ グ 
SHIP の 速 さ 
ミサ イル の 現在 位置 
ミサ イル の 前 の 位置 
00 Al % 8 
CRAB の 表示 する パターン 
| SHIP の 表示 する パタ ー ン 
SHIP や られ た か の フラ グ 
各 面 の パタ ー ン の 先頭 アド レス を 示す 
[4 WAIT 
516 | CRAB の 速 さ 
アス テロ イド の 速 さ 
A アス テロ イド の 発生 率 
бө | CRAB の 発生 率 
C51C ` | SHIPO% 
СОТО 651E| 10 一 100 の 得点 
ер 0920 SCORE 
, 6522 HI-SCORE 
| 16 進 を 10 進 に し て 表示 し た か の フラ グ 
` | CRAB の 残り 数 
_ | SCENE 
| グラ フィ ッ ク 画 面 ク リア 
| 仮想 画面 作成 1 
| キャ ラク タ 画 面 ク リア 
| 仮想 画面 作成 2 
| 初期 設定 サブ ルー チン 1 
| 初期 設定 サブ ルー チン 2 
。 | タイ トル 画面 表示 
| 初期 設定 サ プ ル ー チ ン 3 
| 初期 画面 表示 


Lz^L, 付け た り 取 っ 
たり の くり 返し だ っ た だ ので,。 ずい ぶん と 無 
駄 な 部 分 が ある と 思い ます . 


解析 し て くだ さき さい. 


な ぜ ポ ケ コ ン の ゲー ム の 所 だ け "WAI, 動き , サウ ンド 」 の 批評 を 付け な い の で すか ヵ .. 
(滋賀 県 野 州 郡 野 州 町 立野 州 北 中 2 年 3 組 8 番 の あん ぐり ) 


ന്ന ണ്ട്‌ 
ചര്യം ക്ക്‌ 
tud алы ыы EC АН? പ തനി; 


BIO 


VO, '81 年 9 Н Z 
3) “BASIC 土 280 ア セン ブラ ブロ グラ ミン 


жаа 2” 工学 図書 株 式 会 社 
全体 の 速 さ は $904B 番 地 を 変え ます Ch 7 
きく する と 速く な る ). 
@SHIP の 速 さ は $905C 番 地 を 変え ます ( 小 
る くす る と 速く な る ). 


SHIP の 数 は $9800 番 地 を 変え ます (31H 


私 は 今 ま で に マシ ン 語 と いう も の を 使っ 
た こと が な か っ だ た の で , この プロ グラ ム も 
BASIC+ マ シン 語 に する つも り で し た が 『。 
MZ-80B は 他 機 種 に 比べ る と マシ ン 語 の ゲ 
ー ム が 少な いと いう 理由 で 。 すべ て マシ ン 


モ ォ ー カ ニ な ん て イヤ 


(1%) —39H (9 機 ) まで の 値 と し て < 
だ さい )、 

⑱ こ に の プロ グラ ム は ,。 走ら せる だ びに HI- 
SCORE が 0 点 に な る よう に な っ て いま す 
53, %97Е2--997Е4 番地 まで を NOP (00H) 
に する と 再度 走ら りら せ て も 0 点 に は な ら ず 


011502: 7. 

次 回 作 は 数 段 レ ベル ・ ア テッ プ し た も の を 
と 考 ん えて いま す . 
3 参考 文献 
1) ルリ タテ ム ハ : 

81 年 8 月 号 


"BLOCK 《 す し 。 LG, 


2) ルリ タテ ハ : “HEAD-ON PART?" 


前 の 値 が 保存 る され ます . 
| ര ‘ASTEROID CRAB マシ ン 語 リス ト їй 


Add 
9000 
9010 
9020 
9030 
9040 
9050 
9060 
9070 
9080 
9090 
оодо 
൦080 
90C0 
оро 
ФОЕО 


ENO IDM ONINDNONN O 
വയറിന്‌ 


ta p m Dp O O t3 m 


ご 


F 
С 


- I " + = 
പ ыы ES ra УН 26% 
ട്ര А НА, 


i y 
› “ A ` 1 \ » 
D NC NN er. 1 А ` d 
I + «s AU Р d LAS ы f ` 2 f^^ - Ы M 4 - г 
"ж? " 2 k An 424 も Y ` қ ҒА 1 n 1 2 H p 3 
v . y ` 4 ^ ^ d ` ` > 2 1 ` 4 и С" 
Р , , 4 Ж 1 Ae Ж” Se HT и ds 上 ы E A : 4 
1 x $ «ў PtT aT, L と 
P を 


P mx c алысар” പന... жү 473 

ый е ду, "а 5 IA АРАУ: i] "er も る a i» р. еа све TN pr. у" 
А ОТЕ i ; g z е % FONT " ж an に 
5 ү TI t اسل‎ арыла” - 4 E 4 "m f NT x 


Add +0 +1 +2 +3 +4 +5 жб +7 +8 +9 +A +B +C +D +E +F :Sum 
9700 05 FD Е! 1C 18 F7 7B 77 F1 C9 CS O6 10 1А 77 13 VSO 
9710 23 1477 13 22 14 77 DS 11 26 OO 19 D1 12 10 ED :81 
9720 C1 C9 05 06 ОВ 14 77 DS 11 28 OO 19 Di 15 10 FS :FE 
9730 Сі C9 CD 4F 97 Её IF 3C FE 1р ЗО Fé C9 CD АҒ 97 13H 
9740 E6 iF 3C FE 1B SO Fë C9 CD АҒ 97 Eb O1 ЗС C9 CS s: AD 
9750 ED SF 47 ЗА FD 9D 80 81 82 83 84 85 32 FD 9D C1 03 
9760 C9 ЗЕ OO 21 OO EO 06 28 OE СВ 77 22 OD 20 FB 10 :DE 
9770 F7 C9 77 25.10 FC C9 ЗЕ OO Оё 28 OE 19 77 23 OD 169 
9780 20 FE 10 F7 С? 06 19 77 19 77 DS 11 ОА OO 19 Di TEB 
9790 10 FS C9 CD ЕЕ OC DB ЕВ CB FF D3 ЕВ СЕ 02 05 F4 :E4 
9780 ЗЕ 07 CD 50 OE 21 00 А5 ЗЕ OS 06 CB CD 72 97 ЗЕ :5В 
97BO 04 Oé AO CD 72 97 ЗЕ O3 06 AO CD 72 97 ЗЕ O2 оь :83 
97CO AO CD 72 97 ЗЕ 01 06 СВ CD 72 97 21 DB ОҒ ЗЕ ОО :2 
97DO 06 28 77 23 10 FC 21 DO C4 06 30 77 23 10 FC 21 :86 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー — ーーーーーーーー ーー — — — — — — —— —— — e 


| . . | aoo зо 01 7E O2 35 01 20 02 50 01 AF 01 49 O1 4E O1 :52 


ЖТ) м5 26701175 35)... e < ZA 2g | ^ 
Д Lt ERER 2> 
3 Әле’ Ww Я 9206 


CFT £ 


К j 半田 市 Tomoko dam. 坂戸 市 ぼ お ・ で ‹ の i 柳井 市 菓子 子 千葉 県 ね づ mk2 兵庫 県 小林 朝子 


PLE, 世間 に 流行 る も の . 押し 入れ 強盗 、 KES A, 仕事 を し な いえ れ ぇ 人 . ピオ ピオ ピオ の 世の中 で 。 笑う の は 落語 を 聞く 人 ば か り . Ж 
IREEN OT А клен. നാ тил Sy GN | КУ” | d gt E 


Iz 


М2-1200“"ВОК/С 


WICS+ 7? 24 YEE 


225924 Ы 


B Y.E.C. LOAD-:RUNner 


. BDF AI 

: (あら , 今度 の 人 は 責 極 的 ね え ) 
AA, 私 も 好き よ . で も あな た は 行 
കന ഇസ്സ. 

B: そう さ , 俺 は 「 ギ ャ 〇 〇 〇 」 の 戦士 

W ATE Af 


жн 


€, あな た は 愛す る 人 の た め に 戦う の で す . 


画 プ ログ ラム ・ イ ン フ ォ メ ーション 


WICS 
マシ ン 語 9500--99Е7 


>>> 


D 7 


よく ある タイ プ の ゲー ム で すね. 

も う 少 し オリ ジ ナ ル な 点 が ほし い 
気 も し ます が , まあ まあ の で き で 
bd 9. (о) 


入力 方 法 


i4, WICS イ ンタ ー プ リタ を ロー ド し, 
TEXTSSOOO と し て か ら リ スト 1 を 入力 し 
て く 〈 く だるい. そし て 入力 が 終わ っ だ ら 。 7 
モ セット に ソー ス を セー ググ し て く 《 く だ さい. V 
ー ス ・ ブ ログ ラム は イン ター プリ х ЕСА 
ら す こと は 可能 で す が , 少し 変更 し な けれ 
ば な ら な いし , か な り 遅 く な る の で や め た 
方 が いい で し ょ う . 

次 に コン パ マイラ を ロー ド し 

SOURCE PROGRAM ADRS : $5000 

OBJECT PROGRAM ADRS : $1EOO 

WORKING AREA ADRS : $COOO 

ADDRESS TABLE(Y/N) N 

PASS(2/4) 2 | 
と し て コン パイ ル し て くだ さい . 無事 コン 
パイ ル が 終了 し た ら , 先 の カモ セッ ト と は 別 


ここ か ら は ミサ イル も 現われ 手 強 く な る 


の カセ モ セット に オブ ジェ クト を セー ジ ($1200 
か ら の ラン タイ ム ・ ル ー チ ン も 含め て ) し 
TOW, 

を し て 次 に , WICS の モニ タ な ど を 使っ 
て リス ト 2 を 入力 し , PiO 7 月 号 に 掲載 き 
れ た だ た チェック ・ サ ム ・ ブ ログ ラム を 使っ て 
チェ ッ ク ・ サ ム の 値 を 確認 し , 間違い が な 
けれ ば 先 の オブ ジェ クト の 後に 続け て セー 
"ibt SE, 


Т, オブジェ ュ ク ト を や を ゃ セー ジグ し だ カカ セッ 
ト を モニ タ よ り ロ ー ド し て くだ きる い 。 メイ 
ン ・ プ ログ ラム を ロー ド し 終え る と , 自動 
的 に デー タ を 読ん で オート ・ ス ター ト し ま 
T 

自 機 の 操作 方 法 は 画面 に 表示 る れ ま す が , 
念 の た め 図 に 示し て お きま す . HOOD HE 
す 弾 に 当たら ぬ よ うに 自 機 を 動か し , 敵 を 
破壊 し て くだ さい . 

な お 、 自 機 が 突然 増え る な ど と いう 尾 現 
象 ば 起こ ら ぬ の で , その つも 5 で …. 


ブロ グラ ム の 説明 


ソー ス (リス ト 1) の 行 番号 120 行 に , 
РОКЕ $1840, 30 

と あり ます が 。 WICSOVerl. 2 を 持っ て い 

る ANU, | 
РОКЕ $181D, 30 

と し て くだ さき さい. な お , その 他 の 処理 は プ 


ログ ラム 中 の REM 文 を 参考 に し て くだ るい. ' 


с まだ た 。 マ シン 語 デ ゲー タ に つい て は 家 1 に 
説明 を 示し て なおき ます . етпе, デバ ッ グ 
や ゃ や プログ ラム の 解析 の と き は 変数 表 ( 表 2 ) 
を 参考 に し て くだ る い 、。 

この 前 の 記事 で (ボツ に な ら な けれ ば )、, 


ЖІ アド レス ・ マ ッ プ 


飛行 コー ス (64 バ イト ずつ) 
MUSIC DATA(16 バ イト ) 
ビ プ ラー ト (16 バ イト ) 
キャ ラク タ ・ バ ター ン 
キー 操作 の 画面 

ゲー ム ・ オ ー バ パー 画面 


表 2 変数 表 


自 機 の 座標 
雑用 
敵 の 座標 
弾 の 座標 


英 の 動く 方 向 を 示す 番地 

飛行 バターン の 対称 

敵 の タイ プ 

敵 フ ラグ ( 0 =H, 9 以上 = 爆発 中 ) 
TP と 同じ 


弾 16 方 向 飛 ば し ルー チン を 公表 し まし た だ が, 
今回 も それ を 使用 し て いま す . まだ ビーム 
は 5 連射 で 2 連 砲 で す . 初め は 片方 が 敵 に 
当 だ る と も う 一 方 だ けが 残っ て 飛ん で いく 
ょ うに 作っ た の で す が , 次 の ビー ム を 撃つ 
まで が 長く な っ て し まう し (画面 か ら す ぐ 
НА ОС), 遅く な っ て し まう の で や 
൭ (7, ФЕ, ゲー ム ・ オ ー バ ボー の 音楽 
b 機種 に よっ て 早 き が 異な る の で , ROMw 
ー チ ン を 使わ ず に SOUND 命 令 で や り ま し 


最後 に 


YEC と は , RMSE AZ 77 08RC3. 
この クラ ブ グ で は ,。 LOAD・RUNner こ と 高 
橋 修一 , Tong・po こ と 東方 先輩 (PiO'84 年 
6 月 号 の バト ルミ ッ シ ョ ン の 作者 ) の 2 人 
t, 主 に PiO へ の 投稿 .。 また その 他 の プロ 
グラ ミン グ を し て お ぢ おり, その他 は PiO を Я 
わ ず に 借り て ば っ か り の 人 々 が 。 電気 関係 , 
映画 関係 , その 他 の 雑談 や 遊び や し て いま 
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参考 文献 


宅間 BR: "COSMIC CRUISER II”, 
РіО, "84 年 5 月 号 


BIO 


$: E ൮ " A 4 ۰ » ക LE A A. p % ет. с. ГН > БА ~N “ ЖАЛ ҒЫ p^ |a me dert) eo кА”, Dai! 

HO 4 ന്‌്‌ -— m r ^ Yam 2 4 « I" o. 1 oT А?” AO- zk Г “ も っ Ч Е ç + А Ren SAT Ab Tae T Sr жез. 3% "p 
വ Кын, лада പിച്‌ Oh er Settee യ്യ്‌ വം യുത്ത്‌ 
ж С / n $ w 47. ° > vd せく < г = А 1 " LUCA J 9227 3 Y T 4% SA я ` i ~ кеу M , К ТАҒ; 1 dA. 3 ES nis Fi Ven 


E |). コス モ ・ フ ァ イ タ ー ソー ス ・ リ スト gil 


1100 FEIHT "ESSSEEELUBHD 01:00 33 
118 FFIHT "аланды ігінбіні МАСНІНЕ CATA": CALL 42 
|128 РОКЕ $1544. 30: 20൮6 1388 
| 13 12151: ടഃ ടല: 71051: 10-15) : 5050Е HEH 005) : КАМЫР НЕЕ! 
E — 1 140 HD-1: 50506 2170 | 
A 150 056 27Ей:МЕ-И:2ҢҒ-й:2Ғ-И:ТІт1 
let BOSJE ISrBtPUTa X-1,VY-1,2+1,V+1, $9700 
ҮЙ LU=1 
B IF 1 ЯНГ LCzü BOSE 1578: GHSLHE 1738: GOSUE 1428: GOTO 28 1 
B 8056 1:02: 05-൮6 зей 
& IF LC AND Tes GOSUB 230 
210 БОЦЕ 50: БОЕ 2338 
zz Е=Й:РОЕ М=й TO 1:00: H--1 TH 1 
258 555000: HFH, ++: НЕХТ: HERT 
Ames 248 IF Е-421 GOTO 258 
| | 290 IF 11411 01. 71: EHD 
൧50 LC-IHCZLCO:IF LC-z7? БОТО 180 
rH БОТО 1?80 ` 


ps 279 REM ദ: El 
Се ഥേ [=й 
x зәй IF ТЕГІІОЗ USE BI GOTO 940 
сай IF ТЕГІ1 GOTO 438 
316 IF Tü[Il)=ü GOTO 348 
J260 IF RHE 15S-LOOF:-1 GOTO 348 
338 2:455814:::-7:0 12: : 7:01 355140 ടഃ സലനാടാടെ ТЕГІ] 
348 ОН ТӨГІ1 GOSUE J26; 280, 360: 370, 450, 390; 400; 410, 450; 428, 428. 448, 458, 460 
% дєй GOTO SFA 
J66 BRpilo-£95GBe6rRHDORO:ARIDIJ-PE:STFDIJS1: RETURH 
376 BDZOIS-8:BJIEIJ-1:RETURH 
388 BDCIS-$9548454RHDCS2 : AJLI JSFN: RETURN 
iom BnpiIo-£2528-T-REHD£52:RIDIQsPE:RETLUEH 
488 TFLIJ-RHDCZO:BDCIO-$95CB8-124RHDCE 1: AIDIISPE:FET'IRH 
410 ADE э= фаба TS: ДЇЇ 11=РХ:ЕЕТЦЕН 
42й HDC I5=$#96408+6+FHDCS3:BILIl=F%: РЕТПЕН 
430 AD 1)= ま EETETRNET 3kHTET]=FSIETS[T]=FHEC は EEETUEH 
348 At 1 :ടഥ 0.70 35: TSE[T]=FHETE RETURN 


| | 450 TOCIJSTOCIJ-RHO <30: ലാട БЕТПЕН 
2° 30 Tü[I]=I+1:IF 10072355 707352 
ഒല IF 111351 11235 
МҸ 458 11125 8:ЕЕТМЕН 
m 490 SER-TRLIJ-1:£'2TVL[Il1-1:GÜSZLUB 13688 
ana IF r [4[ 1 15:91 11512 GOTO 548 
| DIM TFLIJ-FEEEKCBHDCI33.415: 51000 0000൩൨. 185 
чей പ 1215: I I+ MOF, 11 
| ead PY=PFA3~1: LAR S dis TL 1 +P ADEI SACI 711 


948. IF CTRSEIJZ2SZOwCTWXEIJ3235» TFLIJ=H GOTO 328 
പച IF 111: S3 WecCTVETI: ғаға TFDIJeg:GüTO 920 
ഥ്‌ OH TGLIJ БОЈЕ ESG TOG. БИЙ, ലം 596: 738. EBs ഥം S20. 220. 948,579. 530, SAA 


^ ara IF TH=1 GOTO A20 
“Әй GOTO "iG 
Б ടല TH=1: RETURN 
| EE IF ТЕСІЈ=5 GOSUE 13zH 
бій TBH-if37,y18G-cTFEII1-1*18:FETUFEH 
528 IF TFIIJ-3 GOTO 656 
&38 TFLIJ-1:BHDCIOG-£EHDZZ3-22:RILIJsCRHDZ32-22 
&48 IF ЕНГ 1251 505 1220 
Бей TXEIJSTSEIJ*BDECIG: T'EIJSTCIJA*BJLDIJ 
EE TF[IJ)=TF[I1+1:TFR=#= 日 TFEIJ 
| STH = まで TTFH キ 1 EETLEH 
E ESH 71:01 35121151: TFRHZTZSEIJ AHD 2 
| 930 TH=FITES+TFHYS: БЕТПЕН 
h ғай GOSUE БВ: IF TFEIJez GÜSUB 1520: RETURN 
К гій IF RHDORBHHD32Z GUSUE 1328 
"28 БЕТПЕН 
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IF ТЕГІ1-3ӛ GOSUE 1326 

THz£2?9B-:TFLI1-1»*18 

EETLIEH 

TSEIJ-TSII]*1: TFH= BHD 1012 
TA=EA7C1+ TFA 18% РЕТМЕН 

ТЕН-ТЕГІ1 BHD S3TSLIJ=TSLII+1 

1 ലാലല ഥം iā 

IF «ТЕГІ1І-2Э ЕК (ҰТЕГІ1-4Эж( ЕН РННрО-193 GOSUE 1228 
БЕТПЕН 

IF vTFULI#S I .RHDEEBHD2-21» (205: 1220 
1015225257 10 [1 3-1 t10 FETLIRH 

15 11351: 1 1-1 : 77-12 AHD 3 

IF ТЕГІ1-г GOSUE 13z 

10533097): "ЕТПЕН 

IF TXLI1sX GOSUE 1320 
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FOR =й TO 9:HERTSHEXT:CHLL 71 

IF FF GOTO 1838 

FOE [=й TO 133 НЕХТ: FETE 
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IF (11-17): 13+ ТЕГ Т1= =й» 8010 1158 ; 

IF (11651 2-1 2I ABSE ZYCI -F920 GOTO 1120 
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コス モ ・ フ ァ イ タ ー ソー ス ・ リ スト 


FOR 5ПР=й TO 16:50 14 ന ന SOUND 2 1:НЕхТ 


бы 


MXEMF J-SGHCPH3 МУГМЕ1- ЗМЕРҰЭ 


ÜüGTzSs3HiBBScPS»-BBSEPRO O2 


A CALL 71:0Н CGT GOTO 1338. 1408. 1318 
Ms CMF T= CMF 19-MELMF J: ЕЕТПЕН 


MSL МЕ =i LMF J+ CMF 731% CMF =H? CMF J +M CMF 3: КЕТПЕН 


A MVEMF T= CMF J+ LHF 1: кеч 


IF MF=ü RETURN 


29 REM BEEEEREBIMOUE EULETT - 


1=1 | 
ӘРПКЕ ЕГІ: RYCIN “2-0 T 


B RRIIJ- КІ 11+ LI]: FYLII- ലാല 
PB PRZER LI] ചട്ട] Ру 


ТЕ 0:80: GOTO 1528 
IF peg Y 24» GOTO 1328 


Я SPOKE റംലി 


I-I*1:IF 15:10 GOTO 1440 
RETLIRH 
MF-MF-1:IF МҒ-й КЕТМЕН 
FOR J-I TÜ MF 
RELIJeRREJI*11]:R'V[IJ]- പാ 
Mel 151015, 12:11 1511-11 
HERT:IsSI-1:GüTO 1286 
еі 8338383110 STAR 
=й 
ടം: EFI] GOTO 15 He 15 
151 5:15: IF SPEEKFE:P'32135 SPOKE Fs PY: 
P'y=F''+HD: GOTO 1680 


ы 1. 1598 


үлі р 


HSIzsB:IF ТІ BHD 4 HSI=46 


IF ЗРЕЕЕ:Е К, FPP う =45 SPOKE ЕХ. РУ. Я 

IF ТІ AHD 1 51-17 

GOUT 1228 

151 54: IF TI AHC 4 НСІзс — 

IF SFEEEKFKR。 ടട SPOKE വം 

IF ТІ AHD 1 P'/zP*--HD 

IF РУ>24 ടഃ GOTO 1714 

IF FYE Рү=24: GüTO 1718. | 
IF SPEEKAFX.P'y»s8 SPOKE PH, PY, HSI 
ലാട നാട ടഃ IF Іт<24 БОТО 15 ug 
РЕТМЕН 


REM ദാദാ. СЕНЕ 


ТІсТІЗ1 | 

IF TI?14BH8 ТІ=1: TIP= TIF-1: TF1-TIP: SCH-SCH-e1:GOTO 1798 

IF TI-138 GOSUE 13738 

IF TI?188 TP1-G:GÜTO 1318 

IF CHA GOTO 1510 

ЕРЕТШЕН . 

RHHDZRRHHD-z:HD-21:IF ¿TIF=SS+(TIP=3+éTIF=12Z2) Нр=-1 

IF TIF>14 ТІР-?:ТРі-?: 5 0041 : GOSE zs 

ലും I=@ TO š 

IF TF[I]= ТРЕІ1=ТІР: TBLT]= 101: GOTO 1348 

СНЯ=СНЯ+ 1 

НЕХТ: RETURN 

FUE 150 TO 5 

IF TFtI128 GOTO 1380 

CHHzCHH-*-1:GOTO 12356 

ТРІІ1-ТНжЕНМО( 55-1 

НЕХТ: സ്വ | 

FEM ЕЗГЕ ЕТЕ | RA 

250: FOR 150 TO 2:ҒОЕ H= TO 2 | 
SFOKE SSH: Su. й ; 

Е=Е+1: НЕХТ: HEST 

РЕТПЕН ` 
REM FESURESESESESF'UT 


 E=0:FOR U=g TO 2 2:FOR неё Ta 2 


മം ざん げ し ます . ханнан, ശാ FAN, 見 た だき に き ば っ て し まい まし た . お 許し くだ さい … 誰 だ 。 ^ X Ee i | 
ке 54 Canada M aos | uote E COR EYE avem) a 
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リス ト 1 コス モラ ファイ ター ソー スリ ラフ トー 


SFOEE SHH. വം PEEK TA+E > 

Е=Е+1: НЕХТ: НЕХТ: РЕТПЕН 

FOR 1= TH 18880: НЕХТ: RETUEH 

REM БЕЖЖЕНЗІНМІТ 

4300: T"2£85818: 1-3: 105320 T= まま Sl 

Mx-£$8048:M'/-:28060: RE-£f»85]0880:R8'/-£:$39H8 

Rp-s88ca: HJ- 35060: 15545000 | 

Hx dr 1 00: Hy]$31z28: 205221 46 

で りー S178‏ :2168 :د اا 

газӣ FOF а TO 24:11: 155140: 

2848 11 12351 :£01 123552: HERT 

PATH RETLUEH 

HEB FOR 1= TO 4:Z#[I])=@:ZV[IJ]=m:z 

zara FOF Isa TO 6: ТЕСІЈ=ТІЕ: ТЕСІЈ=Я 

ZETI REM 8333333300 FUT 

ОН ТЕГІ1-З GOTO 20696, 2100.2 

SOUND TFEIJTE1895RHDZCZGBO:1GÉ 
1й + 
18 


Fini p. ке — — — — к 
TOC s GD w si ли, 
m ыя (m im ua c c кл, 


ടേ [ച айка ыл “J Еи N 


82-1 
“Нр-і 


SLI 150: НЕХТ 
“ТӨГІ1-ТІР:НЕЗТ:ЕЕТМЕН 


118; 2128.21380.214H 
TFLIJ-TFIIJ41:GüUTO 21564 
SOUND TF [ 1 14:14 TF[I]=TF[I]+1:GüTO 2158 
SOUNO 101 1 1:4:1 0൮56 ഥാ: TFCIJ=TFLII+1SGOTO 2154 
04 TFLIJs1804RHDCZGUD 188: TFLIJ-TFEII1-1:GOTO 5156 
50119: TFLIJs18-RHDC2808)*188: TFLIJSTFEIJe1:GUTO 2134 
10112350: САЦ Fi GOTO 2168 

1052: 10 [ 1 1-11112: S5-TALIJ- 1:5%= YETI- 1: 50506 1248 
RETURH 

FEM 3333333301 

РОКЕ FEGA GIFRIHT "E" 


Ca rm m рр 


C c c 


b Ya Cu кл TUL TD 


ュー 
-4. 


PRIHT "COSMO ЕІБНТЕЕ",.“, ? 
FLUTazzi:&:32.:17?.£$29808 м 
РОКЕ まま EGS, 1 Уг 


CURSOR 8,15 

PRINT " r,s | 
PRINT " | SPACE 1". 

PRINT " — "> 


PRINT " (EOE TEs 


テコ トウ ルー نہ ت‎ CO 


171177 Ж mi Fa Fi PSF 


| FO fj RO RO mM — — pe م‎ — ке po pos — (ТЮП 


PRINT "1൮1 AME KEV''" a 
A=GET J. 

| PRINT "E":H-12:''-248: TI-G a 

中 GÜOSLE 1570: 60506 арай ds 
E=d: FOR Uzü TO 3:F0F Н=а TU 4 28 

б SPOKE хен. ചം Et E=E +1 HEST: НЕХТ P 
қоды PLI 1 4 > 
E=giFHR Ч=й TO Z:FÜR H= TÜ 2 Жы; 

1 SPOKE സാല 
à Е-йіҒОВ UzpeOTO 4: FOR Бей TC 4 Pe 
SA SPOKE қанауы). FEER: F38D2+E):E=E+1:NEST:IHERT T 
SF ПЕЕ VET : e + 5 s io 
FOR Ісі TJ tena: НЕХТ 2225 

B 115111: ТІзі22 ТО 2290 Я 
5 5 [= ж 1 | ef 
TASES STA BLUSE SAE 
428. FOR. =й TO FERE Н=й TO 4 : 
SPOKE ханын 2 MEAT: НЕХТ КЫ 

K үші —1 гәр 
Есі: ЕСПЕ = TO 4:FÜüK Ней TŠ 4 f 
SPOKE +H; +: PEEK(#3SD2 +Ез:ЕШ=Е+1:ЦЕЯТ:МЕХТ e 
SPOKE 4*2.13.2 | E 
FOF 150 Та 1388: НЕНТ ре 
TI=TI+1:IF Тігі42 8072 2412 iw 
CALL Pi:TleiiHD-1:4-15:'/-20 Қ. 
PERIHT "8:20: 2: 20: z536 S 
CUFEZÜOUR 18.12: PRINT "READY T po 
305൮ {STH GOSUE 1238 
FOR [=й TO 3:CRLL SDAGE NE T «а 
TI-IHCCTIO:IF Тізгін GOTI 2528 A 

А CURSOR 18.15:РЕІНТ з 


リス ト 1 コス モ ・ アア イチ ソー ス ・ リ スト 
a 2570 TI=1:RETURN - 


ал 


2579 REM EEXEIXEEIIISEHDIHG 


n c 2588 FOR 150 TO 29 

|  . 2598 TFA=I AND 3:TFH=TFH1B 

|. |2600 ലനം.  #a8RB+TFH 
ta: 10 SOUHD S888+FEHDO1834£1BB+I*18 


свой FOF 1-П TO züaüa:HERT:FüR Іса TO а 
2634 ! SPOKE A-ZTRHD632, V-Z*RND£ 53,154 


264й HEST HEST CHLL 71 
z650 150516 2068 


e. 2668 LFS-DECEZLFSZO:IF LFS-8 БОТО 262 


bt 26/8 Т1=1: 650506 2518:60T0 1560 | 
| 2558 РОК I-8 TO 299:NEXT:CURSOR 18, 15:РЕІНТ "GAME OVER": 50506 Зава 


2698 TI-a:HD-1:PRIHT "E" 


M 2700 PUTA 10. 19,15,18, #9990 


er1 CURSOR 12. 20: РЕІНТ 
2,28 GUSUE 1576 
2758 Н-ІНКЕУ:ІР я= "Н" ЕУ 


"ТЕУ AGAIN ? уен" 
Es 


2r48 IF A= TI=TI+1:CRLL DAG: GOTO 2720 


er 1151: GOTO 138 
2759 РЕМ 5552 5 55 5 
2768 CURSOR 32:6:PRINT " 


rr 


erG CURSOR 32: SPRINT " 
2698 CURSOR 31:19: PRIHT 
23089 CURSOR 54.19:РЕІНТ 


8 まま まま HH ド 1140 UTE 


ы І -5C " 


"m 2778 CURSOR 54.7:РБІНТ X5 НІ, "9 


| 
| 


SCORE " 
"LEFT SHIP" 
LFS 


ЮЫН EEE Ж E 

kd Bj Ed ая #3 нив" 
н н P 8 НЕР" 
81319 H HERE ആ 


"кн м ан ദയ.” 


"ТО CLINT IHLIE ന്ധ 2298 


I 111: GOTO 2348 


: SOUND 42880-S0P*SUF 


CEHDIHG _ THEME 2 
=й Tü із: 565050: f F3EEQ+ [2 


SOF=SOF+3: JEPEEK CEZTZ-SÜP 2? U-PEEK CE T S8ÜP 2 I miU ZEE D) P^ 
FOR Ри=й TO 15:50UND പലല: FOR =й TO 249:НЕХТ:НЕХТ 


リス ト 2 コス モ ・ フ ァ イ タ ー ന്‌ 


9528 17 24 54 44 54 52 51 51 :FB. 9548 15 18 15 18 18 
9529 52 91.91 92.51 91 52 514 3558 15 18 18 15 18 
9558 2:54:851:52 91. 5A 92: | 9558 18 15 18 15 18 2 


9558 92 51 51 52 5151: 3560 55 56 56 33 56 
3546 9 18 18 15 18 15 18 : 3568 56 55 36 36 ささ 


7 z816 CURSOR 32:12:PRINT "SCENE" 
v 2828 RETURN 
S 2829 REM KERESEENSCORE FRIHT 
653 2858 CURSOR 54.Э:РКІНТ 55 SC."u" 
Esa 2848 IF 5С<НІ GOTO 2368 
ФЕ | 2858 HI-SC:CURSOR 34; 7:PRIHT Х5 НІ, Иң 
E 2868 CURSOR 34:13:PRIHT X2 SCN, 
ER 286r&8 КЕТПЕН 
B 2879 REM БЕЖЕЖЕЖЕНЕНІГІ ЕНЕ 
a ൧990 CURSOR 7?:18:PRIMT "E 
が 2890 CURSOR 7›,11:РЕ1НТ " 
prt 2900 CURSOR 7?7:12:PRIHT " 
x 2918 CURSOR ?;13:PRINT " 
E 2928 CURSOR 7: 14: РЕІНТ 
ES 2938 T1= —— | 
2590 GüSLE 1S?8:IF TI AND 1:60Tü 2978 

š 29560 CURSOR 18. 18: PRINT "HIT CR KEY” 
> 2968 CURSOR 11.19:РЕІНТ 
E 2970 CURSOR 18, 15: РЕІНТ 
S. 0 CURSOR 11: 19: PRINT. 
ЕСЕ 2936 6056 Seda: IF 11520 ТІзі 
RS зава Ри=1НКЕ'': IF 102 T 
Р 210 1150: FRINT "E":GÜSLUE 2768 
24% 3B2H PUTI x-15:'-1.x1:'41,.£$9786 
КЁ 585й CALL 1:14 
Сй 58.53 REM BEEEREERERRISOUMD 1 
МА 2048 FOF SOF=TI TH TI*29 
S JASE FUE [=й ТП IS:HERTSHERTSRETLRH 
⁄ 3053 REM EEEFEEEEESOLIHD 

seed FOR Ру=1 TO S:FOF I 

iB 

igo 

2830 FOR '-8 TO 49:МЕХТ 

3188 HERT: HERT: CALL 71: БЕТПЕН 
B DC + 
куу; э5@й 18 
к 35088 17 
ERA 3918 17? 
е 9518 18 


P 先日 ふと 思い 立っ て 昔 の !/O を 調べ て , 現在 PiO で 有名 人 に な っ て いる 人 人々 の ルー ツ を さぐっ て み ま し た . まず 香取 信吾 さん は 、 僕 の 持っ て 
い ентот 月 か RS ERU Ne M» cu: adat қан rcs dei Fc Ke] eda; S И ЖҮ: 2%. e て 快 人 


B 
е っ いい л A 
eT 2» >; 


ч AR Ad es 


4-2 コス モ ・ フ ファイター マシ ン 語 リス ト 


A & 
3703 SE FF Әй FF йа FF aa FF 157 
3726 E an 
з : 3?28 ла 69 a 3 
2598 17 17 24 34 44 54 51 51 TCO 3223 3D 4A 42 38 36 7H 36 FF :üD 
5H 51 52 51 51 52 51 51 51 :3B 2758 4E 99 40 ЗА 47 4A 42 43 FB 
Hg 12 : 3743 56 FF ЯЙ FF йй FF йй FF :52 
: 3745 Әй FF Әй FF ай FF Ой FF :Fr 
2 : 3750 4E PB 40 43 47 43 42 さこ +96 
? 3755 56 FF 76 42 4D 4D 4? 42 :30 
SC 2760 42 40 TS FF 4E 43 40 71 155 || --------------------------------- AY 
35D 17 3768 2 =£ 
aspe 3773 
"78 / 


--.........л........- а ーー ーー ーーー ーー 


7 っ 


SUM 


pga a ¢ N 


арр +5 ti +2 +3 +4 +5 +6 +7 ; =l IM 2: | 
SIE аз ай ий ай 80 ой ой пй :йй r= 
3738 Әй FF 09 FF 88 FF йй FF EC Б š 
HDD +B +1 +2 +3 +4 +5 +É +7 UM 2790 РР 81 76 80 5H йй Gü 15 SE 3936 ге T i ` 
3600 17 17 17 17? 17:17 17 17 Be 3798 00 FF йй 81 20 тә SA та :2H 9958 SC 78 73 50 79 7A- ロ 79 :15 
3608 17 1? 1? 1? 17 ІР 17? 17? :B8 コア 月 回 йй 15 ай FF ой 21 йй 24:46 39408 ЗЯ 45 43 3H 79 06 aa 79 :CZ2 
9610 18 1? 13 17 13 1? ІЗІ? BC эга SA 54 ай 15 02 FF ай ai :34 3948 29 3H BH 79 FA 43 43 FA 6A 
2618 28 38 48 58 58 58 58 58 :6ü эгвп 28 30 SA SC Әй 16 88 FF EF 3950 79 D? DR 79 1C 78 78 1D :CC 
36208 58 58 53 58 52 58 58 58 sCg ЭГЕЗ ай 01 2й AA SR 80 TE 15 EF 9958 бй 3B 76 ба IC 78 78 1D OF 
3628 58 58 58 58 58 55 58 58 CA SoU ғ? tad SA 4D 5M SH 43 77 Её 3960 5С 78 78 5D 5С 78 78 SD :5 
3630 58 58 58 58 58 58 58 55 sCB 20S аа 42 ой 42 43 47 a SR :6E 9968 5С 7 SD 79 00 йа 79 :3 
3638 58 58 53 58 58 58 58 58 Сй 3700 SR 77 SH SH 88 4E SA 5 3: "9 79 00 
964М 17 1? 17 1? 1? ІР 1? 17 :B8 DE 43 SR SR Së a 76 йй 765 39 SF 
2642. 1? 17 17? 1? 13 1? ІЗ 1? sg 日 ЭГЕЙ 00 4E SR 50 43 SA SH 56 :4F || --------------------------------- 
2650 1? 17 17 ІР 1? 18 1? 18 SEND 3765 SV OM 6D SR 1B 43 ай 47 :р9 < 
2658 17 13 1? 13 13 ІЗ 13 13 BE TH ой йй 1E a" IB 43 ED SA :40 
366 24 24 44 54 52 52 51 52 :37 302: 
3668 51 51 52 52 44 24 24 14 F6 || --------------------------------- 
357 18 13 13 1? 18 1? 18 1? :SD 
96/8 19 17.13 17 17 17 17 17 ТВО 


ж" — Ó 9 À— 9— HÀ oo n n — o کے‎  — — س‎ —— ーー ニー ニー ーー ニー テー — "сə ーー 


HDD +A +1 +2 +3 +4 +5 +6 +? :5UM Diop URE 
9680 ІР 17 17 17 1? 17 17 1? 388 

2688 17. 17 17 1? 1? І? 1? 1? 5:88 

9698 1? 18 1? ІЗ 1? 13 І? 18 * BC 

9698 18 13 13 13 13 15 25 35 ЗЕ? 

ING 352 22 52 32 32 22 32 32 :90 

26015 26 さら 36 36 36 3? 37 37 :85 

9680 37 3? 27 37 37 37 27 3? BS 

9689 37 37 37 3? 37 357 3? 3? ES 1 
3600 90 58 58 Za 51 52 55 54 E и 
CS 56 58 SH 5С 5E 68 65 66 Б * 
з6рй &9 aC BE NEE BRT E FI UB ED i4. ll ROY DS et 
7608 5% SE E | 
ЗБЕй HS dà ! 
HES 84 25 ау Wü ST || --------------------------------- Ë 
AEF ай 13 4% 
SSFS УР ЕЙ $ 


z CUT, &—743С5$АМЕМ &ВСЗО, & | 
79 BC 30 іе cen UNS 


PiO12 月 号 の ご めん な さい 39 : 55 44 53 


NUMBER ATTACK p.153 82 Le DB 

マシ ン 語 リス ト (リス ト 2) に お いて ババ 2 90 DB 
グ が あり まし た . 以下 の 番地 を 修正 ・ 追 加 Ci BA A8 ഷ്പ 
5474-77 | | | | M 


な ば っ くま ん 氏 は ナン ト '81 年 6 月 号 で ルー ピッ クキ ュー プ ブ の こと を 書い て いま す . すご いで すね . いま PiO で 最も 人 気 の あ る 女性 は みな みり ЛУ, 
ょ うこ きる ん で す が , か つて 1/O で は 七味 十 枯 子 さ ん が マッ プ て 僕達 を 楽し ませ て くれ た こと た も 忘れ られ ませ ん . そ ー を 一恵 江 須 きん と いう 方 も 。 ЖОЕ Лежа 
ഗാമ. và, どう し て いら っ し ゃ る で し ょ うか 、 MZ は 元気 で すか ? э яазкезаге, 7% VAT | ടട 
Naan "АА D ` い 書く の に 5 時 間 も か けた こと キラ イ な に きん ば い ) 
ത നാ аа ен നി : 


y 27%; 


9 2 25 
ഡ്‌ 
VY 
ള്‌. 


ЕР-11 00 


ВАЅІС+ 7 Y VRE 


к ര а: 


LIL 5 18 5 P P 3 8 8.3 8 8 8 1 4 12 5 8 5 15. 
nd м ° 


あな た は , レジ ャ ー 星 の ダ ズ ニ へ 遊び に 
行こ うと 自家 用 趣 高速 宇宙 船 ハ ー ド ・ シ ッ プ 
を 発進 させ た . と ころ が , コン ピュ ー タ が 
不調 で どこ か の 星 の バ ネス 和 群 (触れ る だ け 
で 強大 な 破壊 力 を 示す クォーク 爆弾 . 通常 
は 宇宙 空間 に バラ ま か れ る ) に ワー プ し て 
し まっ た . ワー プ ・ エ ネル ギー の 充て ん に 
は 時 間 が か か る た め , すぐ に は ワー プ で き 
な い 。 

あな た は , この 困難 を 乗り 切れ る か ? 
HIN TL AY THI TYAN 


BASIC 
マシ ン 語 F600—FFFF 


ゲー ー ム に 変化 が な い の が ちょ っ と 残 
念 で すね . (V) 


(リス ト 1) を 入力 し ., 
ご QY L р. 
禁 走 し ます . 


まず BASIC 部 
間違い が な いか ヵ 確 認 し ます . 


っ し て RUN し な いで くだ さい. 
を し て テー ププ "に セー し ます . 
次 に モニ タ か ら マ シン 語 部 (リス ト 2: 
&HF600—&HFFFF) を 入力 し , チェ ッ 
ク ・ サ ム を 確認 し て 聞 違 い が な けれ ば 先 の 
BASIC 部 の 後に モー ブ し ます . 
を それ か RUN し ます . 


TT TTT уна, 


SS 


で 何 か キ ー を 押し 続け る と スタ ー ト 
し [4][@| キ ー で ハー ド ・ シ ッ プ "を 左右 に 
操作 し , [SPACE X キー で ビー ム を 発射 し ま 
T. そし て ,。 エネ ルギー ゲー ジ が プル ー ラ 
イン を 超え る と 面 ク リア で ワー プ " し ます . 


ハー ド ・ シ ッ プ は 初め 3 機 あ り ,。 バ ネス に 


CLEAR , «HCFFE : RAaNDOMIZE:BEEPOFF 
HI-4000 

KEY , " RUNAQ" *CHR$ (13) 
WIDTH40:SCREEN2 

ON ERROR 650701200 


は アウ シタ ン で す / 


ボク も 仲間 に 入れ て くだ さい . 


触れ る と 1 機 失 いま す . 
を 超え て 面 ク リア する 
000, 140,000 点 と 60,000 点 ご と に 1 機 ず つ 
84 ++. 

バネ ス は 。 を その 持っ て いる エネ ルギー 量 
に より ノー マル ・ バ ネス と ブル ー ア イ ・ バ 
ネス に 分 けら れ ま す . 前 者 は プラ ウン 運動 


UL DEY 


20,000: 
51 82, 以後 80, 


を し て いて , ビー ム に 当たり 爆発 する と 50 
S, 方 向 を 変え る と ? 点 で す . 後者 は エネ 


ME と ん ど な い の で 動き ませ ん し , 
ビー ム が 当 だ っ て も 得点 に な り ま せん . 

を し て 1 ゲー ム 終 わっ た と き に ビー ム が 
ノー マル ・ パ ババ ネス に 当たっ だ 命中 率 が 80% 
以上 だ と 。 ボ ポー ナス が も ら え ます . £, 
ビー ム を 一 - 度 も 発射 し な いで 面 ク リア デ す る 
t. 60.000 点 の ボー ナス が も ら え ます . 

な お 。 バ ネス が 多い 面 で は , バネ ス の 動 
き が 遅い の で 囲ま れ や すく て 注意 が 必要 で 
Т. 逆 に 少な い 面 で は 動き が 速く て ビー ム 
が 当たり に くく な り ま す 。 こう いう と き は 
60,000 点 の ボー ナス を 狙い まし ょ う . 


. өн. оны аны, ығы шт оға, а Cd LT 
ҚАУЫ ҰМЫТ АТ Pg aa L TTET a TTT ata TTT da PT at Оа МЫ аты ЧУ ШАМЫ 


നാം 


FP の カ 力 を 充分 に 活か し だ た ゲー ム は は ほほ と 
ん ど あ り ま せん . FP で も , 高速 ゲー ム は 
ARET T. 


= 2. — F ° Z > 2°%o 3 A.Q The Farmer 


な ど は 。 оқа она аба n M Ж 
4 > CPU > ら 送 
ボー ナス を 狙っ た が 


る コマ ンド て 画面 と の 入出 


ЙО ё (с ўт 


' DEMO 


SHIP=3: MAR に = 1 : BP=2000: EN= 30 
CLS: SCREEN2 ,0: COLOR4: CALL &H703 


HARD SHIP 


j E110, E111 


ザー ス の せい で 近々 FM- 7 を 買う ん で す . と ころ で 
P.S. で も ロー ディ スト も 5 年 間 や っ て ます . ちな み に 16 才 で す . 


シッ プ 


谷 部 和徳 


, 音楽 。 キー 入力 な ど を 行なっ て いま す . 


Л 
皆さん も 。 これ ら の プロ グラ Jie 
参考 に し て 高速 ゲー ム を 作っ て くだ さき 


」 バ ネス の 移動 ' 
ワー プ エ ネ ルギー 充て ん 量 表示 
MUSIC 
SOUND 
ビー ム の 移動 
ハー ド ・ シ ッ プ の 移動 
スコ ア 表示 
BGM 
メイ ン 
3 7CPU 


E000—EOFF| バネ ス 

E100 バネ ス の ワー ク ・ エ リア の 下位 ア 
ド レス 

Е102-Е104 ハイ ・ ス コア 

Е105-Е107 1 スコア 

E108, E109 ビー ム | 

E10A EIOB| ハー ド ・ シ ッ プ 

E106, E10D| ワー プ エ ネ ルギー 充て ん 量 

Е10Е, E10F| ビー ム の 発射 数 

ビー ム の 当たり 数 

ボー ナス ・ フ ラグ 

1737 

|BGM デ ー タ ・ エ リア の 下位 アド レス 


— 
E118 


ЖЗ 。 デー タ ・ エ リア 


| ハー ド ・ シ ッ プ 
| バネ ス 
TET T 
"HISCORE" 
"HARDSHIP" 
"ENERGY" 
"WARP" 
| ハー ド ・ シ ッ プ 爆発 
| 数 字 
ハー ド ・ シ ッ プ 爆発 の 音楽 
スタ ー ト の 音楽 
BGM 
空白 
プル ー アイ ・ バ ネス 


РКІМТ"Ш 
PRINT" ® 


PRINT "Ш 


PiO 読 ん びる 人 に アウ シタ ン は いな いん で すか ヵ か ? ボク 


(ロー ズ ト ゥ ロー ド ) 


160 PRINT"H ЕЕ ааъ ғ 
170 PRINT" ЕЕ BN s mamap" 
180 PRINT ` 
190 FRINT 
200 PRINTCSR(17,8) "ЖЕНЕ ജെ wan 

| ' 

210 PRINTCSR (17,9) "Ш п п п 

| | [s] " 

220 PRINTCSR(17,10) "Ш = m а 

в ജ Än 
250 PRINTCSR(17,11)"—- MY = 

ш» ; 

240 PRINTCSR(17,12)" "E M пш 

| | " M 4 
250 PRINTCSR(17,12)" an п а 

а " < 
240 PRINTCSR ( 1 7 。 1 4 ) "ЕЕЕ 回 mamam 

[4 " 


270 
280 


290 FORIX-1TOS:CALL&HAFB,6: CALL&HAFB , 6 
! CALL&HAFB , 6: CALL&HAFB 。 6: CALL&HaFB 。 b: МЕХ 
T: SCREEN2, 7 

300 FORJ-1T02 

310 FORI-1TOSQ0:FORC-4T07: SCREEN2 ,C: PLO 
T(RND (1) *Z20, RND (1) 199) ,RND (1) *7*1: NEXT 
: CALL&HAFB , 7: NEXT 
22 820 SCREEN2,0:FORI4Z-1TO10: CALL&HAFB , 61 
CALL&HAFB , 6: CALL&HAFB , 6: CALLRHAFE, 6: CALL 
പലല, 2: NEXT: SCREEN2, 7 


COLOR7:PRINTCSR(14,18)"by К.О" 
COLOR7:PRINTCSR(12,22) "Hit any key 


550 IFINKEY$« »""THENA4SOQELSENEXT 

540 COLOR7 

350 PRINTCSR(13,3)" m r3" 

260 PRINTCSR(13,4)"4214] 16 I=>" 

570 PRINTCSR(13,5)" — t 

380 PRINTCSR (10, 9)" Fire 

390 PRINTCSR( 1 の 。 1 の) " pu 
4" 

400 PRINTCSR(10,11)"! SPACE 
I" 

418. PRINTCSR(I8,12) " MM 
з" 

420 ҒОКІ=0701000: IF INKEY $< >" "ТНЕМ450 

450 МЕХТ 

440 507012590 

450 ' 

460 'START 

470 ' 

480 0൨.0൮: WIDTH4 の : SCREEN2 , 0: CALL&HFF 4 
の 

49@ CALL&HFB62, , &HFE70,&H2530,5120 

500 CALL&HFFOO , *HDB: CALL &HFF OO , HOF 

S10 


HI$=STR$ (НІ) : HIS-RIGHT$(HIS,LEN(HI 
$) -1) HI$-STRING$ (6-LEN(HI$) ,"Q") «HIS 

520 РОКІ =0Т02: POKEXHE 1 02+ I s VAL (" &H" +MI 
D$ (HI$,5-1*2,2)) :NEXT 

S30 A-&H2000: FORI-QTO3:CALL&HFB62, , &HF 
E70 ,A+1%2000, 64000: NEXT 

540 CALL&HFAB7 , 。HFD68 。 &H さ の AB 。 &HO4909:C 
` ALL&HFAB7 , , HFD68 , を H7 の QB , മമമ: CALL&HFA 
` B7, ,&HFD68, &HBOAG , മമമ 

550 A-tH20F8: FORI =ØT04: CALLŁHFFØO , &HBF 


: CALL&HFFOQ,A MOD256: CALL&HFFØØ,A¥256:CA 
LL&HFFOO 。 “НВО: CALL&HFF の 0 。 71: CALL&HFF の の , Ø 
:A=A+320: NEXT 

560 CALL&HFAB7, , 40൧9 , &H624 の 9 。 1024: CAL 
L&HFAB7 。 , を HFCFB , XHA24Q , 1024 

570 CALL&HFAB7, ,&HFD18,&H54D8,1024: CAL 
L&HFAB7,,&HFD18,*HA4D8,&HO4OQD 

580 CALL&HFAB7 , , を HFCDO の , &H29BB , &H の 5 の の 』 С 
ALL &HFAB7 , , &HFCD の , 1൭൦88 , Н2500: CALL&HFA 
B7 , , &HFCD の , *HA9B8 , を Hg ら の の : 

590 CALL&HFAB フ 7 , , &HFCCO , *H2FF8,*H0700: С 
ALL&HFAB7 。 。&HFCC の , &H6FFB , Hg の 7 の の 』 CALL ҰНҒА 
B7,,&HFCCO , &HAFF8 , を H の 7 の の 

മമ CALL&HFAB7 , , &HFD38, &H3638 , &H の 6 の: C 
ALL&HFAB7 , , &HFD38,&H7528, XHOSA: CALL&HFA 
B7,,&HFD38,&HB638 , &H の 6 の の 


&1@ PDKE&HE മദ , PODKE&HE1 の B , НЗС: CA 
LL&HF9AE 


620 CALL&HFF の の , “HBF : CALL&HFF の の , HCO: CA 
LL%HFF00 ,&H78: CALL&HFF の の ഹേമം CALL &HFFOO 
„ 47: CALL&HFF の の , &H7F 
650 CALL&HFFQOO , を HBF s CALL&HFF の ,&HF A: СА 
LL&HFFQO , &H38: CALL&HFF の の , “HBO: CALL &HFF OO 
,71CALL&HFFOO , &H7F 
440 ' 
650 
660 
672 
ве 
490 
722 
710 
720 
730 
740 


ON WARK-1G0T0720, 740 
FDRI=&HE 108 ТОҺНЕ112:РОКЕІ,0:МЕХТ 
PDRE&HE 1 15 , പേമ: PDKE&HE 1 1 6 。 を H の 2 
PUKE&HE 117 。&H の 1 』 PUKE&HE 1 18 , &H の さ 
POKE&HE 1 14, %H4A 
РОКЕ&НЕ 105,0: PDKE&HE 105,00 
POKE&HE 107 , Ø: PDKE&HE മമ, の の 
POKE&HE 1 OC , Ø: PDKE&HE 1 の D , 0 
POKE&HE112,0 
POKE&HE 198, മ: POKE&HE 1 の 9 മ 
750 POKERHE 10А 。&HF の 』 PDKE&HE 1 OE , “HSB 
760 A=&H2 の の の + さ 2B+B*TNT (RND ൨ 1)#28):Х=А 
MOD2S6: Y=A¥256: R=RND (1) *255*1: H-RND (1) + 
4:А-5НЕООО 
FORI-1TOEN 
` POKEA, X: A=A+1 
POKEA,Y: A=A+1 
POKEA,R:A=A+1 


РОКЕА,Н:А=А+1 
МЕХТ:РОКЕА,&НЕЕ 
POKE&HE 100,0 

840 FORI-QTO24: CALL&HFB62 。 , &HFEAQ , &H20 
004-520*1,7680: NEXT 

850 FORI-1TO23:CALL&HFB&2, 。&HFE フ の 。 &H20 
08%520%1, 7168:МЕХТ 

860 CALL&HFA4B: FORI=0TO1 : CALL&HFAB7 , ,& 
146218 ,&H6C70*16284*I, 256:NEXT 

870 FORI-GTO! :CALLEHFASA, , を HE 14 , &H728 
0%16584%1:МЕХТ 

880 FORI-QTO1: : CALL&HFAB7 。 , HFDB8 , &H72B 
Q*16384*I,256: NEXT 

890 IFWARK-2THENCALL&HFF OD , &HBF : CALL. SH 
FF00 , НСО: CALL&HFF OQ , を HBB : CALL&HFF OQ , «HB 
9: CALL&HFF OO , 65: CALL &HFF ØO, &HFF 

900 FORI=QTO1 : CALL&HFAB7 , , &HFDBO*8*SHI 
P,&H7DE8*16384*1,256: NEXT 

910 CALL&HF9AE 

920 CALL&HF736,,&HFE20 


HARD SHIP マシ ン 語 リス ト 


- 


' 1170 


920 FUEE&HE11 さ 。 の 


940 CALL&HFB10 

945 IF РЕЕК(%НЕ109)<>0 THEN ОРЕВИ 
800 945 

950 IFFEEK (%HE113) =1 THEN1 O60 


960 ' | 
970 'SHIP-SHIP-1 | | 
980 Í 

990 
1 9 の の 


CALL£&HF9FF 
SHIF=SHIP-1: IF ӨНІР-йТНЕМІ 190 


1010 IFPEEK (&HE10D) -7ТНЕМ1060 
1020 WARK-3:G0TO650 。 

1030 ' 

1040 ‘CLEAR 

1050 " 

1050 


EEF (НЕ 105+1)) ,2) *8C$: NEXT: SC=VAL (SC$) 
1070 IFPEEK(&HE112)-&HFO THEN1110 

1080 SC-SC-«-6000 

1090 SC$-STR$s(SC):SC$-RIGHT$(SC$,LEN(SC 
$)-120: SC$-STRING$ (6-LEN(SC$) ,"Q") +5С% 
1100 FORI=QTOZ: POKEAHE10S+I , VAL ("&H"«MI 
0%(5С%,5-1ж2,2)):МЕХТ: CALL&HFAA4R 

1110 CALL&HF736,,&HFE2Q0 

1120 EN=EN-10:EN=EN- (ENS 2) #28 / 
1150 SHIF=SHIF-(BF= く SC ) : SHIF=SHIP+(SHIF 
т11):ВР-ВР-6000%(ЕР-<5С) 

1140 МАКК=2 

1150 65070550 

1160 ' 
“КЕТ 
1180 ' 
1190 
1200 
1210 
220 
1230 
1240 
1250 
1260 


CALL&HFF の の , &HFE 
RESUME 1230 
'END 


WIDTH4Q: SCREEN2,7: BEEFOFF 

FIREZFEEK (&HE1190) +РЕЕК (&HE111) #256 
HIT=FEEK(&HE 10Е ) +FEEK(&HE 1 OF) #256 
IFFIREX »2QTHENPER* ІМТ ( (HIT /F IRE) #10 


00) /10 ELSEFE ド R= の 


1270 PRINTCSR(14,1)" TT KI f^ 
1280 PRINTCSR(14,2)" F^ AII ! I 
1290 PRINTCSR(14,3)" し ーー IN L^ 


1500 COLOR2: LOCATE10Q,S5:PRINTUSING"Fire 
"uuu; FIRE 
1210 COLORA4:LOCATE10,7:PRINTUSING"Hi t 
НИНЕН" HIT 
1320 СО! 0К6:1 ОСАТЕ10, 91PRINTUSING"Perce 
ntage ###. #%"; FER 
1250 SC$="";FORI=ØT02: SC$=RIGHT$ (HEX$ (Р 


EEK (&HE1Ø5+I)) ,2) +SC$: NEXT: SC=VAL (SC$) ` 


1540 IFFER=>8ØTHENBONUS=INT (SC# (PER/100 
) +. 5) ELSEBONUS=Ø 

1250 IFFER=1ØØTHENBONUS=SC#4 

1360 COLOR3:LOCATE19,12: PRINTUSING"Bonu 
s ######0"; BONUS 

1370 SC=SC+BONUS 

1580 IFHIXSC THENHI-SC 

1390 COLOR7:LOCATE190, 18: PRINTUSING"Hi - -8 
core HHHHHHO"IHI 

1400 FORI-1TO10:FORC-QTO7 J 
1410 COLORC: LOCATE10,15: PRINTUBING"Scor 
"unu"; SC: NEXT: NEXT: 6507060 


SC$-"":FORI-QOTO2:SC$-RIGHTS(HEX$(P |. — 


ച്ച്‌ യ വാനില്‌ 
' + に A 


を ж hd 2 た E ti à H を 
к», ES 4 у, өсу із N നേ. Р, š CEU Fer ല്ല Sida 


ПЕ 


പാപാ 
PP AY PD PNDX PN PD 


D МУМУ NIV ND NY ND NI NT ATA SA 


കു 
ടു 


„ы 
s: 


NA DA 
YD 
IA Yo) 


ү РС-8001 | | 
に 3 左右 スジ ロー ル ・ ル ーー チン! リス ト 1 右 ス クロ ー ル ルー チン дыга 


du ゲー ム な ど に 利用 し て くだ さい . DATA 
Кез は 3 ലം тӘ Де Sà 16 REM 3% 270-b ルー チッ 
EARS XOAA は 間違え な いよ うに . た だ だ し ペー ( | 20 FORI-&HDOOOTOMHDOOB: READAS:PO 
ЖЕ പതന スク ロー ル し た 画面 の 中 で 命令 を 実生 ЧӨ FDRJ=&HB21FTD&HBSFFSTEP&H2P 
Wa ー ジ 2 で の 使用 も 可能 ). (ダイ レク ト ・ モ ー ド ) し よう と する と せ U OKEJ, ©: NEXT 
А " 23 2 Ë ч 40 ൧൯0൧൭൭൭൦: 6012848299, © 
3 し L エ ラー や SN エラ ー が 出る こと が あり - ま 50 DATA 21,ҒЕ,82,11,ҒҒ,83,01,ҒҒ, 
(525% ted гу 4 @1 ,ED 。 BB,C9 
AIT 初め に 一 番 左 の 列 の 文字 を すべ て 消し ま 
se +. そし て 機械 語 で 左 ヘ へ スクロール さ せま リス ト 2 左 ス クロ ー ル ・ ル ー チ ン BASIC リ スト 
А Ж; 機械 語 は 必ず し も D000H か ら で な g X 19 REM КЭ“ 0270-0 ルー チン . 
EE. も 構い ま VA. ‚| 20 FOURI=&HD の 9@TD&HDGGB: READAS: РО 
Б! е നു KET, VAL ("®Н"+А%):МЕХТ 
SANSA rF | ЗӨ FORJ-tH8200TOMHBZEOSTEP&H20:P 
SAN ү OKEJ , O: NEXT 
ee SS 40 EXEC&HDOO0: POKESHBZFF , の 
Я 同様 に に て いち ば ん 右 の 列 を 消し て , Ж ko 


スク ロー ル さ きせ ます. 


と と 一 と つ で す が , アニ メ の 魅力 と は メカ に ある の で は な いで し ょ うか . どう し た わけ か メカ ファ ン は 「 暗 い / 
` 」 と 決め つけ られ , 日 陰 者 と 
化し て し E う 運命 を 背負 っ て いる よう で す . 全国 の 隠れ メカ ファ ン よ 、 立 ち 上 が れ / PS.1 Carry lab の JELDAII (MZ-2000 用 ) の STAGE | 
| ¥it, PS2 лили BA, mas 5 D PS 


Кз; ОТОС 


РС-ВООТ mkII 


№о-ВАЅІС+ ണാ. aE 


スネ ー ク ・ ワ ー ル ド は , も と も と PC-8001 


用 な の て 別に 移植 する 必要 は な い の で す が , 


それ で は せっ か く の 320 メ 200 の グラ フィ ッ 
ク が も っ た いな い の で 移植 し まし た . 
較 プ ログ ラム ・ イ ン フ ォ メ ーション 


N80- BASIC 
マシ ン 語 CI00—DOEO 


うま く 〈 移 植 さ れ て いる けど , せっ 


か く mkII な の だ か ら , PCG に は で 
き な い 1 キャ ラク タ を 2 色 で 構成 
し て ほし か っ た . 


പ e eere 


7 SONS 
0252 


デー Mini xr CAN da SR NS 
示し て お きま す 。 こ の プロ グラ ム , 実は 原 
版 の 方 の は まっ た だ たく 〈 く 見 ず に I/O, "83 年 9 月 
号 の PC-8801 用 を 移植 し た の で す (だ っ て 
I/O, 81 年 の を 持っ て な いん だ も ん //). 

それ か * ら 移植 する 際 , わか っ た 順に ワー 
Ут സ്യം っ た の で , 
は まな vi BM NE 


S ex Ж МАМА МА `Z 
( & X 


ООХ 
OO 

まず , BASIC C CLEAR1OO, &HCOFF 
を 実行 し て か ら 打 ち 込 ん で 《 く だ さい. な ぜ 
2'CLEAR3OO, &HCOFF と 上 する と マシ ン 庄 


が 壊れ JM 
YA С 
О) "M 


< / 
ഗ്യ 
と いっ だ 数 に し て 
- また 弾丸 を 連発 式 に し だ 
い 人 は , DH の 値 を COH 2° 5 00H に 変 


表 に 示し o2. Et. 
いる も の は 00, 01, 03, 
お いて くだ さい 、. 


えて くだ さい. Жі, 私 は 原版 を や っ だ こ 
үзін ЯЕ. 全体 の スピ ー ド が 違う か ' も 
し れ ま せん . や っ だ こと の ある 人 は 適当 に 
合わ せ て くだ さる い (私 は 少し 速い と 思い ま 
3). 


スネ ー ク ・ e 


ペン ペン ペン ペン ペン ペン ペン ペン ペン ペン ペン ペン ペン 
« > $ Ж XC 2< Жж >O 
< Ж X < Ж ОХ УУС p 2 < CY 
ZZ O ベン NINININI NINN N NX 
あな た は [8l, [2], ‚ [6] の キー で 上 3 
ശശ ര な お ライ フ 


ル は [Zz で て で 左 に , [X] Cf (= 
ます . 
本 に ヘビ て す M, 


それ ぞ れ 発射 し 


へ ビ は 丈夫 な 体 を 持っ 
て いる の で , 頭 に ライ フル を 命中 させ な け 
れ ば 死に ませ ん . 蛇 を 殺す と 得点 が Ip 
з 100 点 加算 きれ ます . ЗИ 
吐き ます . これ に 人 間 が 触れ る と 死ん で し 
まい ます . 特に 蛇 の 頭 と 人 間 が 並ん だ と き 
に 吐く 確率 が 高い の で 要 注 意 で す . 
サソリ は 除 々 に 人 間 を 追い か け て きま す . 
AEF VINE, 動き が 遅く な 
ьа NE, 死ん で し まい ます . し 
か し 。 サ ソン リ は ライ フル で 撃た れる と 抜け 
殻 を 残し て どこ か へ ヘ へ ワーフ" し ます . そし て 


ワー プ す る ご と に 動き が 速く な っ て きま す . 


また , サン マリ の 残し た 抜け 殻 に 人 間 が 触 
れる と 死ん で し まい ます . サソリ を 撃つ と 
50 点 で す . 

ー ナ ス は 各 面 を クリ ア す 
※100 点 が も ら え ます . 

きら に この ゲー ム に は スペ シャ ル ・ フ ラ 
グ が 出 て きま す . 奇数 面 の 最初 の 方 で す . 
カウ ンタ を 1 バイ ト し か と っ て な い の で す 
ぐに 消え を えて し まい ます が 。 簡単 に 取れ る と 
面白 く な い の で この まま に し て あり ます . 

も ちろ ん スペ シャ ル ・ フ ラグ を 取れ ば 人 
が 1 人 増え ます . た だ し 。 人 が 10 人 以上 に 
な る と 正しく 表示 きれ ませ 和み か が, 別に バグ 
Саәоззл, ui, この スペ シャ ル ・ 
フラ グ は 仮想 画面 に は 書い て いな い の で サ 

ソリ や 毒液 は 通り 抜け て し まい z+. 

う , 後 か ら サ ソン リ が … 


る ご と に 面 数 


SCORE ісва HIGH 4650 MAN 1... 


£ 


А 


(決し て オー ラ ・ バ トラ ー で は あり ませ ん よ の 乗 野 高校 1 年 X 組 ポテ ト の 好き な Whyneck 略 し て P.L.Whyneck) 


we 


DX 
ый ТЕ 


а X у 
ME Es DR a ല്‌ 


` DW ‚Жү で ме 22; 
Hi DE dee 
AU, poe 332 


Á 


5576 А ы өк т 
ысы ы амалды 2 


* 
з 
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wa AA99... Hig Аг 
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表 1 アド レス ・ マ ッ プ 


グラ フィ ッ ク 表 示 用 


| X, Y 座 標 を V-RAM ア ドレ ス に する 
| X,Y 座標 を 仮想 画面 用 アド レス に する 


G-RAM ク リア 
メイ ン ・ ル ー チ ン 
10 進 出力 ルー チン 


| タイ マー 
| RND 発 生 


SOUND 用 サブ プ ル ー チ ン 
仮想 画面 クリ ア 

第 1 初期 設定 

第 2 初期 設定 


| クロ ッ ク の 更新 ,“"Z"or"X" の キー を 押し た か 
| 人 間 を 1 人 増やす か 


初期 画面 
サン ソン リ の ワー プ 


サソリ の スピ ー ド ・ ア ッ プ 


| 人 間 の 移動 


得点 の 加算 と 表示 


| ライ フル 発射 


人 間 が 死ん だ と き の 処 理 
ヘビ の 発生 

^ ビ の 胴体 表示 
^ E OR SE 
毒 を 吐く 

へ ビ の 移動 

ヘビ を 消す 
弾丸 移動 

サソリ 移動 メイ ン 
サソリ 移動 サ プ 
1 面 終了 時 の 処理 
毒液 移動 サ プ 
毒液 移動 メイ ン 


PUT 用 デー タ 


一 番 上 の 文字 の デー タ 
人 間 出 現 音 1 
人 間 出 現 音 2 
サソリ 出現 音 


| サソリ と 人 間 の ぶつ か っ た 音 


へ ビ に や られ た と き の 音 


|| COLOR6,0,.0 の ステ イタ ス ・ バ ッ フ ァ 
| COLOR7,0,.0 の ステ イタ ス ・ バ ッ フ ァ 
| 星 表示 用 の デー タ 


“BONUS" の デー タ 


表 3 変更 点 


С | 全体 の スピ ー ド 
| サソリ の スピ ー ド の 初期 値 


JE | へ ビ の スピ ビード 
85 | 毒液 の スピ ー ド 


кең, 


КК e E TA 


4659 МАН 2 —. 


— ー グ ラム が で きま す (tOKRb5, スプ ライ | あげ まし ょ う / に 
CO の 0 ト み た い の が で き な か っ た り , 4 色 し か 出 ഇക്ക; 32 2 UP 
ы | EDT せな い )、 遠藤 繁夫 :“ ス ネー ク ・ ワ ー ル ド “。 VO, 
NOO ОО SSS し か し , そん な こと を 言っ て て も 始ま ら | "83 年 9 月 号 0 | Hg 
qaseq 8001mkII は 日 立っ て ませ ん . PC な い の で , 皆さん も どん どん プロ グラ ム を 
-8801 よ り も 6G-RAM が 少な い പി ЖҮН 作っ て PiO に 投稿 し , PC-8001mkII を 盛り 
222 ത്ത mum ART AX4—2-*7—»F BASIC ZF 


1280 LOCATE 5,15:PRINT "ШЕН ш а sumen 
rau E "T 

290 LOCATE 5,16:РБІМТ "RAN Ы на ~ 
` | к в” - 

500 LOCATE 5,17: PRINT "ч Чч шағын 

Ха (фей —" 

310 LOCATE 4,19: COLOR S:PRINT "see 33 
ж IC JC ЗЕ Je IE JC ЭЕ JC JE C ЭЕ ЗЕ ЭЕ ЭЕ EE ее" 

520 ҒОКЈ=1 TO 10: CMD COLORG(5,5)-(39,9) 

,0: CMD СО оке (5,15) ~ (59,17) ,0: CMD COLORE 
‹5,5)- (59,9) ,CO*J: CMD со оке (5 。 15)-(59,1 

7),CO0*J*1: NEXT J 
330 FOR I=1 TO 1000:NEXT 1 | 

240 COLOR 7:WIDTH 40,20:CMD CLS 3 

550 LOCATE 5,24:COLOR 6:PRINT "44$ SNAK 
E WORLD 444" 

560 PRINT :COLOR 4:PRINT " жж SCORE ADV 
ANCE TABLE xx" 

370 PRINT :COLOR S:PRINT " SCORPION ・・・ 

* 50 points" 

380 PRINT " SNAKE E 

590 COLOR 6:FRINT " BONUS 

100 points" 

400 PRINT:PRINT:COLOR 5: РКІМТ " key f 

unction" 


REM E E E E ЭЕ ЭЕ ЭЕ ЭЕ ЭЕ ЭЕ ЭЕ ЭЕ ЭЕ ЭЕ ЭЕ ЭЕ ЭЕ ЭЕ ЭЕ ЭЕ ЭЕ ЭЕ ЭЕ ЭЕ 
110 REM ж SNAKE WORLD * 
|120 REM * . * 1984Ж 9"VOBB* ,, | 
150 КЕМ ж I/O 1981368 3t*- * 
140 REM പലം 
150 CLEAR 100, %XHCOFF 
155 CMD SCREEN 2,0,1:CMD CLS 5 
| 169 POKE &HDODE,O:POKE &HDØDF , Ø 
170 CONSOLE 0,25,0,1:WIDTH 40,25:COLOR 7 
ЧЕМО CLS 3 
AV uc 
190 CMD CLS 3:CO=INT (RND (1) #6) +1 А 
|2200 LOCATE 4,3:COLOR 5: РКІМТ "жж жже 
ユメ スス スス エネ ミミ ネネ テ ミミ ネ ミミ ミミ ミミ 3 
‘210 COLOR CO:LOCATE 5,5:PRINT " Awam. m. 
B 4 B г шағ 
220 LOCATE $,6:PRINT "M K` HB 4 ` 
n^» m " ; 
25@ LOCATE 5,7: PRINT инь E `" E 
| mn WENN" 
240 LOCATE 5,8:РКІМТ " . = ss 
аға ш ' А 
|250 LOCATE SVP PRINT " w ш пи в 
| 8 ~ ши 
20 COLOR CO*1:LOCATE 5,13:PRINT "അ й 


450 PRINT LEFT 4 + 6 RIGH 
T" 
440 PRINT " RIFLE 2" 
450 PRINT " Z <---> X DOWN" \ 
460 PRINT :PRINT :PRINT :COLOR S: PRINT М 
HIT RETURN KEY "; 
470 IF ІМРОТФ (1) < >СНКФ (15) THEN 470 
480 WIDTH 40,25:COLOR 7:CMD CLS 3 
490 LOCATE 0,0,0:PRINT " ":DEFUSR=&zHC2F さ | 
: D=USR (Ø) : LOCATED, Ø, 1 Y 
500 SC-PEEK(&HDODD)*256«-PEEK(&HDODC) 
510 IF SC>HS THEN HS-SC:COLOR 7:LOCATE 2 
1,0: PRINT USING"#####0" ; HS; :POKE &HDODE, 
PEEK (HDODC) : POKE&HDODF,PEEK(&HDODD) ` | 
520 CMD LINE (64, 40) - (256, 88) ,0,BF い | 
530 COLOR 3:LOCATE 9,6: PRINT തന്ത 
പി | ) 
540 COLOR &:LOCATE 9, 7:PRINT "as GAME 444 
OVER. $s" ` 
550 COLOR 5:1 ОСАТЕ 9,8:PRINT "HINH 
#333 HHH 
560 COLOR S:LOCATE 7,10:PRINT "PLAY AGAI 
М = RETURN key "; nu 
570 IF INPUTS(1)<SCHRS(13) THEN 570 ELSE 
240 


ER. шыш в — | 410 PRINT :COLOR 7:PRINT " 580 END | | ; 
270 LOCATE 5,14:PRINT "Шаш E mE up" 
LES "a T (420 PRINT " 


IJAM2 スネ ー ク ・ ワ ー ル ド 
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^ А. 
൫00. ' 
Nu є i 4 


ルレ 


kts പാ O 
BIDEN + v а des ол A 
2 PDA г>» ェ ж | yi 
445 EX M "US jt. р 
un (9 š - 
4 F 
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リス ト 2 スネ ー ク ・ ワ ー ル ド マシ ン 語 リス ト 
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туы 


4i 


2» % 


1 72, 


56% 


ビー 


жу жузй» 


fi 


NERO RE Y. Z $ e ê it <” й of 


Ta 
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UM 
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x т 


A. ж 
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ОФ Ыз, コン 


GOOOOOOOOOOOGOGG( 


支 ジ ノシ ー ト は 何 度 も 聞く 前 に 必ず カセ ッ 
NP STE з= ШКМ С ISVS, 
Жо 7 2-1. 49) 02 BRIA, 2v+ 9:4 
使い 傷 が 付か が な いよ うに し て くだ さい . 
放 ソ ノシ ー ト に 傷 や ホコ リ が つく と エラ ー 
に な っ て , 実行 不可 能 に な る 恐れ が あり 
ます (読み 込み が で き な く て も お 取り 換 
え は で きま せん の で ご 注意 くだ さい ). 
雄 い っ だ ん パン コン に ロー ド し て OK と な 
っ た 場合 は , パソ コン か ら 別 の カセ モット 
や ディ スケ ッ ト に セー プ し て くだ さい . 


工学 社 で は I/O1977 年 8 H, 


ビ ピュー タダ タ ・ フ ァ ン No.2 Съ 
ュー ド ( ソ ノシ ー ト ) を 付け まし た . 当時 は 
ワン ボー ド ・ マ イコ ユン が 主流 の 時 代 で , 110 
ボー, 300 ボ ー と いう ボー レイ ト が 普通 で あ 
り 5, 今日 の ボー レイ ト と は 格段 の 差 が あり 
254. 

今回 の ツノ シー ト に つい て は , その 点 に 
関す る 技術 的 チェ ッ ク が 必要 で す . PiO 編 


集 部 で は 読者 の 皆様 の ご 協力 を お 願い し て , 


この シス テム を 発展 きせ て いき だ いと 考え 
て いま す . 


同 9 ЯУ, 


と こんにちは, Long Ago で す 。 最近 PC-6001( 新 品 ) を 買っ た の で すか 、 
学校 の 数 学 の 時 間 と 、 休み 時 間 以 外 使う こと が 少な て な っ て し まい まし た . 
よい ed AN ポケ コン の RS は 出 そ 5 に な い Le", ろ な きん の 中 で パー コン рое ERT сете う に ポケ コン を 使っ て いま _ 
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.an exciting game called FM- 


” 


ғ, 


ч 20000000000000000000000000000000000000000 А 


f 
知ら せい だ だ けれ ば 幸い で す . 


の 今回 ロー ドミ る せ て みた ブロ グラ ム 名 . 

@ プ ログ ラム の 実行 が で きた 場合 , 
用 機材 . 

Фо, 今後 ツ ソノシート で 供給 し て ほし 
い プ ログラム が あれ ば その 種類 . まだ た ソ 
ノシ ー ト を 再生 する と き の 技 術 的 アイ テ 


ィ ア 等 ご 意見 ・ ご 希望 を 書い て くだ さい . 


送り 先 
Ф151 東京 都 渋谷 区 代々 木 1 -37- 1 
ぜん らく ビル 5F 
埋 工 学 社 PO 編集 部 「 ソ ノシ ー ト 係 」 


⑳ ミ ラク ル ・ ワ ー ル ド (p.90) 
PC-6000 シ リー ズ ( モ ー ド 2 , ペー ジ 2) 
ロー ド お よび 実行 方 法 
CLOAD "MWORLD" [RETURN] 
RUN [RETURN] 

TYPE LESSON N88 (p.17) 
PC-8800 シ リー ズ (Nss-BASIC) 
ロー ド お よび 実行 方 法 
LOAD “CAS : ТҮРЕ” 

RUN 


SIDE A 
HI ! PiO readers ! My name is Roxana, 
and I'm from sunny Riverside, Califor- 
nia.'lll give you some nice pieces of 
computer music (ha ha). 
Are you ready to recq 

PC-6000 feries, 
Неге we gd 


Let's start from 
"Miracle World 
АП right--wha 
program. How û 
keyboard drill your ownébractice,the 
РС-8800 serig$EILIype Leéon N88" ? 
Let's start арй! 


ў start the 
bout going ой to a short 


good way 


e it 
Ма も $ 
's һауфа”% 


Did you ma 
Good ! оте to the end of 
side A. ort break, and 
ГМыоИҒуои again bn side B. 

SIDE B 


Why don't we conti 


we ve 


эртат with 


BOMB 


e the p 


BOMB” ? Let's go! 
It's time to get геаауйог grande fina 
our last game-the X1 Series "Lunar City 
SOS. 

Well, that's all for no 

These programs have been presented by 


PiO. 


See you again. Bye bye! 


т Алы сата алды. ала ныса ы 
ҚА; ас Cg RAZ Š 
എ ര ОЗА Ы нл EET БОРЫ 


PiO 編 集 部 宛 に 下記 の こと を お 


その 使 


Side A | 

ハー イメ PiO 読 者 の 皆さん . 私 は ロク サ 
ー ナ , カリ フォ ルニア の 太陽 が ま 
バー サイ ド か ら や っ て きま し た . 
お 送り する の は 皆さん の 大 好き ね 
ュー タ ・ ミ ュー ジッ ク 」 で す ( 


録音 準備 は で きま し た 
6000 シ リー ズ の 122 


SIDE B 
FM- 7 「BOMB BOMB) TT. スタ ー ト / 


€ BOMB BOMB (p.100) 


47-4 m w = 
4 Ne . i qo xs ел 2% RAS A t 
RT RD M eoi RENE ЕЛ, 


pb 4 N T 


(BH) 


FM-7 | 
ロー ド お よび 実行 方 法 
LOAD “CASO : LOADER". 
RUN [RETURN] 
この あと に マシ ン 語 部 分 ( 2 本 ) を ロー ド 
LEN: 

Q»7—774 SOS (p.44) 

X1 シ リー ズ 
ロー ド お よび 実行 方 法 
本 文中 参照 


編集 部 で は - 


ソノ シー ト に 収録 され て いる プロ グラ ム は レベ ル 

が 小さ めで す . テー プ に 録音 する と き は デッキ な ど 
の 録音 レベ ル が 調節 で きる も の を 使い , 大 きめ に 録 
斉 し て くだ さい . 
PiO 編 集 部 で 実験 し て みた 結果 は , プロ グラ ム の 部 
分 が VU メー タ で 二 3dB が も っ と も 良い 結果 が 得 ら 
れ ま し た . し か し , 装置 や テー プ な どの 条件 に よっ 
T, 数 dB の 誤差 は 生じ る と 思い ます の で , レベ ル を 
変え て いろ いろ 試し て みて くだ さい . 

+ 3dB と いう と か な り 大 き な 音 で すか ら ,VU メ ー 
タ や スピ ビー カ を 壊す 可能 性 も あり ます の て , ERIE 
意 し て くだ さい . 

な お , PiO 編 集 部 で 実験 し た 機材 は 次 の と お り で す . 
① プ レイ ヤー : AUREX SR-P2F ② ア ンプ : ト 
リオ KA-7300⑬ デ ッ キ : アイ ワ КЖЕ ) う デー タ ・ 
レコ ー ダ : シャ ー プ CZ- 8 RL 1 , ア イワ DR- 1 , 
NEC PC-6082 


ふし いり リ 
これ か ら 


Le Ы 
名 付け て PC-8800 シ リ 
ッ ス ン N88」 で す 。. 始 


た か . それ は よ か つ た 


、 次 は 大 迫力 で お 送り する ゲー ム , 


それ て は , いよ いよ 今回 の フィ ナー レ で 
% 1 シリ ー ズ の 「 ル 


ナー シディ イ SO0S.. 


‚ * Gad 『 
— , 


いか か が で し た か . 
PiO で し た . それ で は , また 


ブログ クラム の 提供 は 
会 いし まし < 
バイ バイ . | 


や は り パ ー コ ン を 買う と ポケ コン を あま り 使 わな く な っ て . 最近 で は 
まだ RS-232C が あれ ば パー ュ ユン と ポケ コン 問 の 通信 が で きる か ら 


ан ажы 
i 
М е പ്‌; を に た 
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1൪% 90 — 100€ SUBMARINE ' 2 SCREEN 


時 は 西暦 1996 年 7 月 15 日 , 太平 洋 が 某国 
の 大 艦隊 に 侵略 され た . 太平 洋 の 防衛 に あ 
た っ て いた 日 本 軍 は , 某国 の 突如 の 猛攻 に 


よっ て 海軍 の ほとん ど を 失い , な す 術 も な | 


《 太平 洋 か ら 手 を 引い た . アメ リカ に 援軍 
を 要求 し た 日 本 側 に 対し , アメ リカ 側 は こ 
う 返 答 し て きた . 
「 エ ンタ ー プ ライ ズ と 米 海 軍 の 総力 を 送 
>. 5 日 間 も ち こたえ よ . 健闘 を 祈る 」 
日 本 は 5 日間, 日 本 の 東海 上 の 北緯 30 度 , 
東経 150/ 度 の 地点 を 中 心 と する 半径 150 海 里 
の 海上 で , 某 国軍 を 迎撃 する こと に な っ た . 
そし て あな た は 薔 水 艦 隊 の 隊長 に な っ た -. 
果たし て あな た は どの くら いも ちこ た える 
こと が で きる だ ろう か 、. 全 世 界 の 運命 を 決 
し た 戦い が 始ま っ た . 
※ この 物語 は フィ クシ ョ ン で す . 中 に 登 
場 す る 名 称 は 実際 の も の と は 一 切 関 係 あり 
ませ ん . 
較 プ ログ ラム ・ イ ン フ ォ メ ーション 


| マシン 語 C000~E53F 
スタ ー ト E518 
к? 
ج‎ ә ج‎ 
E»? 2 
| こん な に 整理 され た プロ グラ ム を 
| 見 る の は ひさ し ぶり で す . ゲ ー ム の 
| 方 は ちょ っ と 単調 すぎ た か な .(A) 


EXPLANATION 
OF THIS GAME 


画面 上 に ある 潜水 艦 。 駆 遂 艦 , 巡洋艦 , 
そし て 戦艦 を すべ て 撃沈 し て くだ さい. だ 
だ し , 赤十字 船 , 魚雷 艇 。 対 潜 哨 戒 機 。 そ 
し て 海賊 船 は いく ら 撃 沈 し た り 破 壊し て も , 
面 ク リア に は つなが り ま せん . な お , 対 潜 
HBA BIRT à EA. 

対 潜 哨 戒 機 の ミサ イル が 一 番 恐 い 


бә, ക്ര. 4 A ЖА 
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` INTRODUCTION OF 
CHARACTERS'POINT 


e BM 205. 
e X UEM 305. 


e fa'iiit---MYSTERY(60-— 100). 
@ ミ サイ ル … 同 上 . 
e 海賊 船 … 同 上 . 
e 赤十字 船 …100 点 . 100 点 未満 の と き は 0 
点 に な る 。. 
な お キャ ラク タ の 説明 は , ゲー ム の 前 に 
出 ま す の で 省略 し ます . 


ABOUT THE TORPEDOES 
AND MISSILES OF ENEMY 


e 洪水 艦 の 魚雷 は “上 ト ". 常に 右 へ 移動 . 
e 駆 遂 艦 の 魚雷 は “1” 常に 落下 . 
ФРА aga. 同上 . 


@ 戦艦 の 魚雷 は , 落下 中 は "W", あな た の ・ 


HIKE E HERKE, “て て" や“ ナ " に な り ま 
Ф: | 

e 魚雷艇 の 魚 生 は “一 ". 常に 落下 . 

@ 一 番 大 きい の は 対 潜 哨 戒 機 の ミサ イル で , 
常に あな た だ た の 潜水 艦 を 追跡 し ます .. 


EXPLANATION 
OF THIS PROGRAM 


この デ ロ グ ラム は 。 オー ル *・ マ シン 語 で 
+. 打ち 込む 前 や , ロー ド す る 前 に は Clea 
г 300, & HBFEEFEE を 実行 し て くだ きい . 2 
部 打ち 込ん どら, チェック サム を 調べ , 
OK だ っ だ ら モ ニタ より , GE518 を 実行 し 
て くだ さき るい. その 時 点 で ゲー ム は 始ま り ま 
ғ. 


НОУ/ ТО PLAY 


最初 に 。 日 本 も アメ リカ の 交信 状況 が 画 


ショ ン が 表示 され ます . ここ で て で [RETURN | 
を 押 き な いと , また 最初 に 戻り ます . [RE ` 
TURN | を 押す と , ゲー ム ・ ス ター ト で す . 

右 下 に いる 潜水 艦 が あな た の 潜水 艦 で す . 
М, [A], [x], |p| を 使っ て 潜水 艦 を 上 手 に 
ュ ン トロ ー ル し て , [K], [L] で 魚雷 を 発射 
し て 敵艦 を 撃沈 し て くだ さる い . көшет 
ける の に も ,。 これ を 使っ て くだ るい. 

面 ク リア する と , 面 数 X100 の ボー ナス が 
加わ り ま す . 潜水 艦 は ある 得点 に な る と 1 


_ 隻 ずつ 増え ます . 面 数 が 増え る ご と に 段々 


BEL < Zb £3. 10812 ) 7 + Z と GIVE 
UP, 残り の 洪水 艦 が 0 に な る と , GAME 
OVER で す . GIVE UP 目指 し て 頑張 り ま 
Lua 


CONTENTS OF 
THIS PROGRAM 


プロ グラ ム は , C000H —C507H $ THF 
ー タ ・ エ リア .,C508HーE53FH が 主要 プロ グ 
ラム ・ エ リア , Z LU ТЕ60ОН--Е77ЕН?%7-- 
ク ・ エ リア と な っ て いま ず 。 メモ リ ・ マ ッ 
Z, RI に は 主要 ルー チン の 内 容 , Ж21- 
は ワー ク ・ エ リア の 内 容 、 そし て 各 主 要 ル 
ー チ ン の フロ ー チ ャ ー ト を 載せ まし た . 


メモ リ ・ マ ッ プ 


に こつ 
എല യാ ifi に 映 b i す . を の ま ま に し て お く と Ф 
れ が 永久 に 続き ます . 早 く や り だ いと き は , 
[RETURN | を 押し て くだ さい . 次 に 各 キ ャ 
ラク タタ と を の 得点 の 説明 と 。 キー ファ ンク 
i^ 
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初期 設定 

847222 000.853 
乱数 の 初期 設定 , 発生 
潜水 艦 の 移動 
敵艦 隊 の 移動 
敵艦 隊 の 攻撃 

得点 表示 

音 出 し , 得点 増減 

敵 爆発 
潜水 艦 の 魚雷 発射 , 移動 
潜水 艦 爆発 

) ゲー ム ・ オ ー バ ー 

スク リー ン ・ ク リア _ 

- ギ プ ・ ア ッ プ 

ラン キン グ と ネー ム ・ ラ イ テ ィ ング 
メイ ン ・ ル ー チ ン ` 

タイ マー 

デモ 2 

デモ 1 _ 


※ こ の 表 に 載っ て いる アド レス 以外 の も の は , 
_ 小さ な サ プ ブルー チン や 各 ル ー チ ン の 続き で す の 
ത いた ずら し な いよ うに . 


Е2: ワー ュー ク <・ エ 9 リア 


潜水 艦 の 座標 , 方 向 , 爆発 フラ グ 

MOUKIEOBAR, 魚雷 座標 魚雷 生死 

フラ グ , 敵 潜水 艦 生死 フラ グ 6#9 

PENER, 魚雷 座標 , 魚雷 生死 フラ 
| 7 PREETI 8 焦 分 0 

SEDER, 魚雷 座標 , 魚雷 生死 フラ 

7, 0302437257 8 食分 

121021 ATER AEDA, 生死 

757, WEER757) 8 食分 

魚雷 艇 座標 , 魚雷 座標 , 魚雷 生死 フラ 

グ , 魚雷 艇 生死 フラ グ 

対 洪 哨 戒 機 座標 , ミサ イル 座標 , ミサ 

イル 生死 フラ グ , ത്താ? 

赤十字 船 座標 , 進行 用 タイ マー, 生死 フ 

ラグ 

海賊 船 座標 , 進行 用 タイ マー, 生死 フラ 

グ 

潜水 艦 魚 雷 用 

スコ ア 

潜水 径 の 残り 

SCREEN 

ベス ト ・ ス コア 1-58 

ボー ナス ・ シ ッ プ 用 

乱数 用 

ネー ム (1 一 5 位 ) 

ネー ム (一 時 記憶 用 ) 

ネー ム 書 き 込み 中 の BOX 座標 

どこ の アド レス に 次 の 文字 が 書き 込ま 

れる か ? 

BOX の 中 の 文字 

敵艦 隊 移 動 用 

敵艦 の 数 

タイ マー 用 

ベス ト ・ ・ ス コア の 中 で の 順位 


で ストー スネ ョ ア は 5 つ あ り ます 、 ペ スト 
- ス コア に あな た だ の 得点 が ラ ンク ・ イ ン す る と, 
` 名 前 を 書き 残せ ます . ラン キン グ は ゲー ム 


B bas. 


E ങെ 字 以 内 で 書い て くだ さき さい. 

- 廊 字 の アル ファ ベッ ト の ほか に , SW 
ത്‌്‌; 
“BIT b C OC at, “一 "の と こ 
、 ろ で [SPAcE] を 押す と 1 ORD, “ATI 
O つ 空 間 が で き , “ オ " で 終了 で す . 箱 の 操作 


L. Ë 


` 


Demonstration | 


Fleet Attack 
Control 


Get Time 
Control 


7. 1 分 以内 に 入力 し て くだ さい . 


KNACK OF GETTING 
HIGH SCORE 


敵艦 を 1 ER し て MYSTERY POINTS 
DAD IWA ve RAR TSW, 
た だ ただし, 敵 の 攻撃 に 気 を 付け て くだ さい . 


な お , 潜水 艦 と 打ち 合う と 負け ます . ЖС 
潜水 艦 を 撃沈 する の が 得策 で し ょ 
ا‎ 


LAST 


ゲー ム 中 に 敵 が 攻撃 を 中 断 す る こと が あ 
MK シュー トス AV 


Sv сә” 
LN 


Submarine 
Bursts 


Submarine 
の 数 は 0 


Screen Clear 
Control 


な っ た ら , 艦隊 の 切れ 目 の と ころ へ 逃げ 
て くだ さい . さも な いと 1 隻 が 攻撃 する の 
を きっ か け に 一 斎 攻撃 が 始ま り , その 魚雷 


ЖС Љо ТЕС T., 


それ か ら , 対 浴 哨 戒 機 の ミサ イル を 破壊 
する と き は , くれ ぐれ も 気 を 付け て くだ き 
с. 魚雷 艇 を 撃沈 する と きも , 海面 の すぐ 
下 で 撃沈 する の は 危険 で す . 運 が 悪い と 
魚雷 に 当 だ っ て 死に ます . 
ロロ 参考 文献 വ; 
1) “マイ コン 機械 語 入門 ", 電波 新聞 社 
2) чаа プロ グラ ム テ クニ ജക 
電波 新聞 社 
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突然 で す が LEVEL 3 は な ぜ ン フト が すく な い の だ / ち くし ょ ー。 コム パッ ク の 「 ザ ・ コ ッ ク ピ ッ ト 」 の 広告 で 初め は LEVEL 3 用 と か いて 

、 いた の に , 9801, 8801 用 が で る L LEVEL 3 の 6 文字 が あと か だ も な く 消 を えた の は な ぜ だ ろう …. P.S.1 鹿児島 の 日 野見 て る か 一 、 久 し ぶり | 

ABEL, 福岡 の 井上 だ よー. Р5.2 ടം But, 金 が … PSO3 美砂 好き だ よー⑦ (美砂 子 が 好ま な 来 夢 来 人 ) | 
TM { rd srs Ы 4 vi к x М പി c ^d 


-E 
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D v . - д Г) A 
= * も e £ "ds } or" : ЧЧ уч Я N š жауы у ` Mc, 
E > നിര്ത്തു ; жі эЛ. ааа қолы 4 1 WAY APA AS A cm. ` әрт ЕМУ 
Шау қала ғ が АА ы wu. a ere i MA ELLA op S MER Pe Et de 
ro j も か っ а P: алаты, , Ұйық റണ്‌; ട്‌ - че ETT Doo қы” 3 573 
Z^ vU: た e Vz Ж UNS TIS А, ) D 4% രന്‌ + - ۹ ° i ^ #7 . | "Кс 
wt EAS ര്‌ ` А; є 4 ^ * í [ $ ^ 
4». ҒЗ ғ 
s: ei LAr IR мъ? 


ーー ーー 


Е2ЕӨ 33 63 EA ഒം өв CD B7 EQ 21 85 Сз CD ED 52 21 :АВ 


Sum СӨ 16 17൭൭ 95 74 3C C7 А5 F9 1D Өр FB F4 7B 6C :55 
t \ i 
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TT ЯЖ 3 О ө Я 


ыи асва SEH, т». AMAR- ー ト に っ | PP や EU TA 


PC-BOOO» 


N-BASIC 十 (マシ ン 語 ) 


PiO 9 月 号 の THE CLIMBER を 移植 し ま 
し た . ゲー ム の 内 容 は まっ た く 同 じ で , Ж 
う の は キャ ラク タ と スピ ー ド で ぐ で らい で す . 


画 プ ログ ラム ・ イ ン フ ォ メ ーション 


これ は 移植 だ けど , プ ログ ラム 的 に 
は 向上 し て る か ら GOOD/ で も , 面 


ぐら い は オリ ジ ナ ル 性 が ほし か っ 
た な . (A) 


プロ グラ ム は BASIC と マシ ン 語 か ら で 

き て いて , 主 に 処理 は BASIC C, ТУУ 
語 て は PCG の キャ ラク タ 定 義 と 仮想 V-RAM 
へ の デー タ 転 送 だ どけ で す . 

BASIC に 関し て は , ほ と ん ど オ リ ジ ナ ル 
版 と 同じ で す . ただ オォ オリ ジ ナ ル 版 で は DAN 
が は し ご な だ を 措 し で し まみ の で 政長 し る 
Б 

あと PCG の 音 出し に つい て で す が 。 これ 
が な か な か 大 変 で 周波 数 の 計算 や し て も ま 
と も に 音程 が と れ ま せん . まだ 少し ずれ て 


THE CLIMER 
for РС-В@@1+РСб 

3 1984.8.23 by ТАКЕСНАМ 

100 CLEAR 200,*HCFFF:WIDTH 40, 25: CONSOLE 
0,25,0,1:COLOR 2,22,0:PRINT CHR$(12); 
110 DEFINT А-2:ПЕҒҒМА(Х,Ү) =PEEK (&HF さ の 2+X 
*24Y*120) : DEFFNE OC, Y) =%HF3Q2+X%2+Y%120 
120 DEFFNC(X,Y) =PEEK (&HF さ の さ +X*2+Yx12 の ) : № 

A$="A.H. 0" 

130 RESTORE 1840:0UT 81,Ø:FOR I=%HDS10 T 

O &HDSD7 

140 READ 1%:РОКЕ I,VAL("&H"4I$):NEXT:WID 


DEFUSRZ=%HDSCO: DEFUSR1-7£&HDS109:A-USR1 


OUT 15,54 
COLOR 7:FRINT " 
2.PRO "; 
I*$=INPUT$ (1): IF I$-"1" THEN L-1:GOTO 


INPUT LEVEL 7 1.4 


190 IF I$-"2" 

200 GOTO 180 

210 WIDTH40: SC-Q: MA=3: RO-1:FE-O 
മമ COLOR2:PRINT CHR$(12);:Y-22 

7:AY=22:VB=10 

220 10САТЕ0,0:0М RO GOSUB 9:0,940,950,96 

0,970,980,990,1260 

240 READ K:COLOR2:FOR Ісі TO K:READ XX。Y 

Y,LL:LINE(XX,YY) -XX*LL-1, YY) ," .": NEXT 


THEN L=2: GOTO 210 


;Х=5:АХ=2 


Tile РІ 


リー ズ +PCG 


ザ クラ イマ ー 
Pr 
LI 


いる か も し れ ま せん か カ が, 勘弁 し て くだ 
一 応 デ ー タ は 参考 に な る と 思い ます . 


他 に 仮想 V-RAM と し て V-RAM の 未 使 
用 の と ころ (40 字 モー ド の み ) を 使っ て い 
まず 。 безе ченин LÀ A W 
は オ リ ശശി Lt AE だ 


ォ オリジナル 版 と 同じ で [gl[2][4][e| で MA 
N が 上 下 左 右 に 動い て , DAN? 597-522, 
GOLD (オリ ジ ナ ル 版 で は パー プル ・ ス トー 
м) を 10 個 取り , 一 番 上 まで 行っ て くだ る ぃ 

制限 時 間 が あっ て , BASIC が 遅い の で 
オォ オリジナ ル 版 より 長く な っ て いま す . し か 


この ゲー ム は DAN よ り 時 間 に 注 意 
2 


AHO 
LEFT MAN: 
2 


ae a2 23 
ROUND 
3 


E 


ка ра 


250 READ К:СОЦОК5: РОК Ісі ТО К: КЕАРр ХХ, Үү 
Y4ULLTLINEOOX, നന - (XX 。YY+ じ ヒー1 ) 。 "1 "NEXT 
260 COLOR6:FOR Ісі Т010:КЕАр XX,YY:LOCAT 
EXX,YYsPRINT ".":NEXT 

270 COLORA4:LOCATE1,23:PRINT STRING$(27," 
=") 

"280 80521110 

290 A=USRZ (0) 

200 LOCATE X,Y:COLOR 7:PRINT " 
AX , ൧൦: COLOR 3:PRINT "в" 
210 ҒОКІ-0Т0500:МЕХТ 

520 AL-Q:TIME$-"QO:00:00": 
UE 1800 

250 DATA 59,185,47,199,29,194, 
191,428,8,153,0,11,292) 
340 main 

250 player 

360 M=INF'( の ) 』M1=INF'( 1 ) 』s IF М+М1=51@ THEN 
LOCATE X,Y:COLOR 7:РКІМТ "=":G0TO 550 
570 LOCATE X,YsCOLOR 2:FRINT " " 

280 H1-2FNC(X,Y):H2-FNC(X,Y*1) : H-FNC (X, Y 
—-1):H4-FNC(X-1,Y): HS-FNC (X+1 。 Y) 

390 IF Н1-129 THEN LOCATE X, Y: COLOR 2:РК 
INT " ":VBzVB-1:SC-SC«*100:LOCATE 21,5:С0 
LOR7: PRINTUSING"####%" 3 5С: РОКЕ FNB(X,Y)+ 
പി eg ҒОКІ-200Т0249:00712,255- 3 NE 
XT: QUT2 
‚400 IF 


=": LOCATE 


RESTORE 330: GOS 


29,195,22, 
9,218,9,0,0,0 


iE THEN LOCATE X,Y:COLOR 4:PRI 
NT "?":0UT2,8:FORI-QOTOZ2S55: DUT12。1: NEXT: Ü 


ら 遅 いと いっ て も それ ほど 遅く な 
CDT, 充分 楽し め ゆる と 思い ます . 


Су td 


初め 。 マ シン 語 で プロ グラ ミン グ し た だ たけ 


れ ど も , BASIC で 入力 し て 遊ん で みて こ 
の 速 る な ら 充 分 と 思い , BASIC に し て し 
まゆ の まし ただ SAS 語 は ディ ペック が まだ が 


STU RINT TL SAUTE, 
^. TË L uo C Eh DTS STAD, 

暇 に な っ だ ら ど ん どん ゲー ム を 作り ます 。, 

3 参考 文献 

1) “THE CLIMBER”, РіО, 

6) POGES RAT FV 


行 番号 マッ プ _ 


'84 年 9 月 号 
81 年 1) 


や られ た と き の 処 理 

ゲー ム ・ オ ー バ バー の 処理 1 
ラウ ンド ・ デ ー タ 

ゲー ム ・ オ ー バ ー の 処理 2 
画面 表示 

面 ク リア 

ギ プ ブ ・ ア ッ プ の 処理 

ラウ ンド ・ デ ー タ 

ミュ ー ジ ッ ク 

マシ ジ シン 語 デ ー タ 


"UT2,0:GOTO 770 

410 IF M-251 AND H2-176 
E X,Y:COLOR 7:РБІМТ "=" 
OR S:FRINT : GOTO 45@ 
420 IF M=2 さ 9 AND Н4<>128 AND Х<>0 THEN X 
= メー1』 LOCATE X,Y:COLOR 7:FRINT "m":IF Hi= 
136 THEN LOCATE X*1,Y:COLOR S:FRINT "I"; 
GOTO 450 

420 IF M=191 AND H5z2128 THEN X=X+1:LOCA 
TE X,Y:COLOR 7:PRINT "a&":IF 日 1=1 さ 6 THEN 

LOCATE X-1,Y:COLOR S:FRINT "| ": БОТО 450° 
440 IF М1=254 AND HZ-126 THEN YzY-1:LOCA 
TE X,Y:COLOR 7:FRINT "L.":LOCATE X,Y-«1:CÓ 
LOR S:PRINT : SC-SC*10: LOCATE っ 1 .5: COL 
OR 7:РКІМТМБІМС" #####"; SC 

450 IF Х-АХ AND Ү-АҮ GOTO 770 

460 IF Ү=@ AND VE=@ THEN GOSUE 1230:G0T0 


ule! 
<< 


470 IF Y=0 AND УВ<10 THEN LOCATE X,Y:COL 
OR S:PRINT "| "sY=Y+1 

480 IFSC=5 の 9 の THEN FOKE ҒМВ(5,10),29:РОК 
E FNB(5,10) «1,29: RESTOREA90: GOSUE1800 
.490 DATA 20,2,18,2,20,2,0,0 
500 IF Hi-29 THEN SC=SC+500: GOSUE 1730:6 
OTO 22 

510 IF TIME$»"QO:02:20" THEN 770 ` 

520 IF SC>5 の の の AND FE= の THEN MA=MA+1 : LOC 
ATE 22,14:PRINT MA:FE-1:0UT2,8:0UT12,10: 
QUT12,10:FORI-QTO90: NEXT: DUT2,0 


THEN Y=Y+1: LOCAT 
s LOCATE X,Y-1:COL 


Tk. TAIT, 0-5 レー ス 
തറി 


പ്‌ аме Wie uta n 


の ルー ル を 説明 し まし ょ う 
2.7 (こん な ゲー ム で よろ この, 


“H EN" e “ 


Жасады йылын ҮЛЕСІ bi OE aru: 


まず ノー ト の 上 に シャ ー ペ ン を ね か し 、 そ し て 。 Wern AEDT SD 


I/O で は じ を か いた た りら りら ぁ ゅ まん) 


PERIA x^ aA ers: NM DRUSI x 


М 


aet 


Moos 5% 


| THE CLIMBER BASIC J スト 


S30 QUT2 ,8: QUT 12,5:00712,30: FORI=0TO10: 
| NEXT: QUT2,0 


| LAY: COLORS: PRINT "I ' 


| 250 IF 


540 ' dan 
$50 F=RND (1) #L+1: FORI- TOP; LOCATEAX ,AY:C 


| OLOR2:PRINT " " 


| 560 Аі-ҒМС(АХ,АУ) 


|570 IF AL=Q THEN AX-AX-1:LOCATE AX,AY:CO 


LORZ:PRINT "W":IF 61-126 THEN LOCATE AX+ 
 1,0Y:COLORS:PRINT "|" 


4 58@ IF AL-1 THEN AX-AX*1:LOCATE АХ ‚АҮ: СО 


LORZ:PRINT "Ш":1Е А1-126 ТНЕМ LOCATE " 


| 590 IF AL-O THEN IF 41-129 THEN LOCATE А 
|X*1,0Y:COLOR6:PRINT "." : 
600 IF AL=1 THEN IF А1-129 THEN LOCATE А 


| X-1,ñY:COLOR6:F'RINT " 


610 IF AL=Ø THEN IF 412128 THEN LOCATE А 
X*1,A0Y:COLOR2:PRINT "_" 

620 IF AL-1 THEN IF 41-128 THEN LOCATE А 
X-1,0Y:COLOR2:PRINT "." 

X=2 THEN AL-1 

640 IF AX-26 THEN AL=Q 

650 IF Х-АХ AND Ү-АҮ GOTO 770 

660 IF АҮ<Ү-1 THEN GOSUB 7@@:АҮ=АҮ+2 
670 IF АҮ>Ү+1 THEN GOSUB 700:АҮ-АҮ-2 

680 NEXT: COLOR7: LOCATEZO,17:PRINTTIMES$ 
690 OUTZ,8:0UT 12,5:QUT12,20:FORI-QTO1Q: 
NEXT:OUT2,0:G0TO 360 ` 

700 LOCATE AX ,AY:AZ=FNC (AX , AY) 

710 IF 42-22 THEN COLOR2:PRINT " ":RETUR 
N 


720 IF А2= 
RN | 
730 IF А2-126 THEN COLORS:PRINT "| ":RETU 
RN 

740 IF 42-129 THEN ഥം: PRINT ч": RETU 
RN ` 


128 THEN COLOR2:PRINT. ".":RETU 


| | 75g RETURN 
| 760 “ break 
| 770 FOR 1=0701200: NEXT:LOCATEX,Y: മമ ( 


Xi Y):GOSUR 710 

780 GOSUE 700 

790 X=4:IF Н1=128 THEN y= Ү-1 

800 АХ=22: А =0: МА=МА- ടു COLOR 
4:PRINT MA 

810 RESTOREB20: GOSUB1800 š 

820 DATA 44,197,49,197,52,22,49,197,44,1 


үт 97,29,194,25,121,21,194,29,192,31,194,25 


,121,29,194,42,59,0,0 
മ IF MA=@ THEN 840 ELSE 200 

840 PRINT CHR$ (12); ` 

850 MIDTHB の : LOCATED, 4: COLORZ2: 1$-SFACES (1 


5 


860 PRINTIS" 


870 FRINTIS"_ зал ЫЫ ыы ല്‍ 


GSS ad A cy c Acl 


_ سس‎ ーーーーーーーーーー 


Edt Lr X 
ETT PRINTIS" i _ eo 


910 RESTORE920: GOSUE1800: ҒОКІ =0704000: NE 
XT: WIDTHA4O:GOTO 1000 

920 DATA 26,193,26,193,29,195,21,194,24, 
151,24,151,51,194,29,194,54,151,21,194,2 
9,195,26,195,26,195,20,2,0,0 

950 RESTORE 1520: RETURN w^ 

940 RESTORE 1560: RETURN 

950 RESTORE 1600:RETURN  ' 

960 RESTORE 1640: RETURN 

970 RESTORE 1680: RETURN 

980 RESTORE 1720:RETURN 

990 RESTORE 1760:RETURN 

1000 LOCATE 7,11:COLOR7:FRINT "YOUR SCO 
RE IS ";5C;" POINTS" 


1010 IF НІ<5С THEN НІ=5С:РКІМТ СО ОК: FR 


INT TAB(11)"YOU GET Hi SCORE" ELSE1070 
1020 RESTORE 1030: GOSUE1 800 
1050 DATA 59,185,47,199,29,194,29,195,22 
,191,20,0,15,0,15,0,15,0,0,0 
1040 PRINT:PRINT TAB(7):INPUT"YOUR NAME 


| PLEASE"; I$ 


1050 IF (ЕМ(1%)26 THEN 1040 

1060 NA$-1$ 

1072 COLORS: PRINT: PRINT TAE വമാ "TRY AGAI 
ҒА Ж - о "4 

1080 О%=1МРИТ%(1):1Е ОФ="п" THEN END 
1090 IF О%="у" THEN FRINT:FRINT:GOTO 170 
1100 GOTO 1080 ° 

1110 COLOR 2:LINE(29,0)-(28,22) ," ",B 
1120 CULOR6: LOCATE 20,1:РКІМТ " THE" 
1130 LOCATE 20,2:РКІМТ "CLIMBER" 

1140 LOCATE Z0,4:FRINT "SCORE": COLOR7: LO 
САТЕ21,5: PRINTUSING"44449"; SC: COLORS 


| 1540 DATA 8,2,4,4,14,6,13 


1150 LOCATE 20,7:РКІМТ "HI SCORE": COLOR7 


 :LOCATEZ1,8:FRINTUSING"SHHHHH":HI 
| 1160 COLOR6:LOCATE 50,10:РКІМТ "TOP MAN" 


: COLOR7: LOCATEZ1,11:PRINT NA$:COLORA 

1170 LOCATE Z0,12:PRINT "LEFT MAN": COLOR 

7:LOCATE32, 14: PRINT Mà: COLORS 

1180 LOCATED, 16:FRINT "TIME" 

. 1190 LOCATE 20,19:РКІМТ "ROUND":COLOR7:L 

DCATEZ2,20:PRINT RO: COLORS 

1200 LOCATE32,22 l ! 

121@ IF L=1 THEN РБІМТ "АМА" ELSE РБІМТ 

"PRO" 

1220 COLOR 7:RETURN 

1220 BO-0:FRINTCHR$(12); 

1240 LOCATE1S, 10: COLOR7:PRINT "ROUND" ; RO 

.3" CLEAR" 

Ty LOCATE12,10: COLOR7: PRINT "ROUND" RO 
CLEAR" ; 

1260 FOR 1=0701500: МЕХТ 


1270 IF TIMES "00:01:45" THEN В0=1000:60 


Т0 1210 

1280 IF ТІМЕ%<"00:02:10" THEN ВО=500: GOT 
O 1210 

1290 COLORZ:PRINT TAB(14)"NO BONUS": REST 
ОКЕ 1500: GOSUE1 8O0: GOTO 1340 

1300 DATA29,195,31,194,35,131,39,194,44, 
197,47, 199,52,22,59, 185,59,185,0,0 

310 COLORé:PRINT. TAB(11) "BONUS POINTS"; 

"BO: SC-SC«BO 

1220 RESTORE1330: GOSUE1800 . 

1520 DATA 29,195,21,194,29,195,29,194,25 
,121,21,194,29,195,29,195,0,0 

1240 FOR І-0Т02500:МЕХТ 

1250 RO=RO+1: RETURN 

1360 WIDTH4Q: COLORZ: PRINT СНЕФ (12) :RESTO 
RE1370: 605081800 i 

1370 DATA 59,185,29,194,29, 195,20, @,15,@ 
,10,29,7,128,0,0 


1280 PRINT" ШАҚА» ел AC: "; 2 COLORS 
: PRINT" ーー 1200, 0൫2 പു 
23998 PRINT xu s യ്‌ "s COLORS 
SPRINT" ": COLOR2 
LAT TRIN LO See aed TURN Шш "s COLORS 
PRINT" saan COLOR 
‘1410 FRINT" _ аллы! sat РЕГИ 
001074... LN ーー"! COLOR2 JN 
АА PRINTS 25 2 e "ss COLORS 
PRINT 7I :COLORZ | 
1430 PRINT" _ _ _ X "ss COLORS 
PRINT” 0, 2 " s COLOR2 ku 
1406. PRINT" dd ഷ്‌ പാം 80086 
ജനന ニー ニー x : , 
1450 COLOR7:PRINT:PRINT:PRINT" с 
| ONGRATURATION ''" 


1460 PRINT:FRINT " 
s SCi" POINTS!" 
1470 RESTORE1480:GOSUB1800 


YOUR SCORE IS" 


(1480 DATA 59,185,47,199,39,194,29,195,29 


1195,22,191,26,193,29,195,71,194,51,194, 
21,194,29,195,26,192,26,192,22,191,22,66 
,22,66,22,191,29,195,29,195,29,194,29,19 


.4,22,66,22,66,22,191,26,193,26,192,29,19 


5,51, 194, 51,194, 29, 195, 31, 194, 31, 194, 55, 
121 


1490 DATA 21,194,21,194,26,193,29,195,29 


,195,29,195,0,0 

1500 ҒОКІ=0702000: МЕХТ: БОТО 1010 

1510 ' Rel 

1520 БАТА 11,2,1,25,2,2,25,2,5,25,2,7,25 
.2,9,25,2, 11,25,2,13, 25,2,15,25,2,17,25, 
2,19,25,2,21,25 


1520 DATA 22,5,0,2,10,0,3,24,2,2,26,2,3, 
6,4,2,16, 4,2120, 6,3,25,6,3,5,8,3,23,8,3, 


9,10,2,12,10,3,6,12,3,18,12,5,14,14,3,22 
,14,5,4, 16,5;19, 16,5,11, 18, 5, 21, 18,2,2,2 
0,2,25,20, 

,8,17,10,2,12,2 
5,14,15,18,17,20,9,22 

1550 ' R.2 - 

1560 DATA 20,7,3,20,2,95,4,10,5,11,3,7,12 
3:18,94,15,6,11,21,2,13,5,8,15,16,4,15,11, 
20,15,7,4,17,6,12,17,15,24,18,2,5,19,1,1 
65,19,4,24,19,2,24,20,2,5,21,20,24,21,2,2 
4. 224-5 
1570 DATA 16,4,0,5,6,1,4,19,1,4,12,4,2,4 
з6,7,10,6,2,20,8,23,11,10,5,21,12,52,8,14, 
5,12,14,2,25,14,5,6, 16,5,18,16,5,4,18,2, 
2,20,3 

1580 DATA 10,2,2,6, B,6,16,8,25410,2,12,9 
»12,12,16,16,18, 10,22 

1590..." R.5 


1600 DATA 21,15,1,4,2,2,25,7,5,6,16,5,8,. 


3,7,64,17,7,84,2,9,23,2,11,23,2,13,19,22,1 
5,2,2,15,8,13,15,2,17,15,5,24,15,1,2,17, 
5,8,17 7.433319, ,10.19,4,18,19,7,2,21,9,1 


5.41; ` 


2.01927 
бз 


АТ xd tette 


711.3117, 5,12,17,4122,17, 


1610 DATA 22,17,0,5,4,2,5,8,4,2,10,4,5,2 
'9,4,3,18,6,2,22,6,5,12,0,5,7,10, 3,14, 10, 


5,22,10,5,18,12,3,5,14,5,%, 14, 5,21, 14, 45%. 


25,14, 5, 11 416,3,7; 18, 5, 15, 18,5,17, 18,2,1 
9,18,5,9,20,2 


1620 DATA 12,4,22,4,5,8,18,10,9,12,13,14 


;,24,14,2,16,3,20, 15,20 

1630 ' R.4 + 

1540 DATA 20,2,3,26,9,5, 12,8, 700, 3,75 

25g 29839247; 9, 16,25,9,2,2; 11%2,6,83 
8,25,11,2,2,15,5,6,13,18,25, 15,5,2,15, 

2517ұ26%0,1%і2645,21Ұ7, 11, 21 7424,21, 

1650 DATA 11,14,0,23,4, 1 ,6,25,1,6,2,6,7 


5, 
27,6,7,7,14,2,22,14 ,3,2,16,5,27:16;5;4%2 


2,2 ,25,20, 4 
1560 DATA 9,4,20,4,2,10,25,10,4,12,25,12 
,4,16,25,16,11,20,17,2 
1670 ' Б.5 
1680 DATA 21,1,2,2,7,2, 
,5,4,5,7,4,9 (2:3, 18074 6 
1151723 411,521, 13,27,0 қ 
2 
, 
12.19,2,8,19,5,16,19,8,24,19,4,0,24 
21,1,2,21,2,6,21,6,1034,21,2320,21, 6 
1690 DATA 26,1,0,3,4,2,3,6,2,5,15,2,5,25 
2,5,10,4,5,8, 5,3,12,6. 5,19, 6,3,10,8,7,2 
5,8,2,15,14,1,16,14,1,19,14,1,25,14,5,4, 
16,3,9,16,3,13 PT 5.2,18,2,11, 18,2,17,18 
42,20, 18,2,22,16,2,4,20,2, в8,20,2,15,20,2 
1700 DATA 23,4,5,6,17,10,2%,10,19,12,5,1 


] 445416, 16, 18,27, 18, 6, 20 


1710 ' R.6 
1720 DATA 38391231 1559 4 2.45 Rd EE h a 
9391990936; 2, 5, 7% 10, 5; 8,253» 9,2,5, 10, 2,9, 


10, 4,5,11,2,10, 12,2,12, 154,5,104 14,2,15,1 


4, 9, 15, 15,2,23,15;1; 15, 16,2,2 22, 16, 1, 15, 1 
7,2,22,17, 1,15,18,2,22,18, 1.3.18, $i i5, 19 
9,2,20,4 ,8,20, 5,8,21,8, 8,22,8 


1730 DATA 9,4,0, 18, 7,2,5, 9,6,4,15, ы; 8,13 | 


39,12;17,13,6,6,17,3,22,18,5,4,19,4 


1740 DATA 15,2, 13, ж 11, 9, е ЯА 


7,4%; 18, 10, 19, 15,20; 20,22 š 

175@ eR. 7 | i : 
1750 DATA 58,2,0,7,12,0,15,12,1,10,2,2,4 
,8,2,9,23,2,5,2,5,4,14,3,12,2,5,26,16,6, 
1,19,6,1,22,5,1,2756,1,3,7,14; 567,420; 


7,1,22,7,4,27,7,1,26,8,1,18,8,1,20,8,1,2 | 


2,8,2,26,8,2,10,9,1,15,9,1,18,9,1,20,9,1 
ത്രം; 10, 8,11, 10, is 16, 10, T. 18 
310,1 

1770 DATA 20,10,1, 22,10, 1,274 08:1; Miti 


:1,164,11, 12,2,12, 5,15,124,14,24,15, 5, 14, 12 


2,2,15,24,3,16,1,72,17,12,24, 17, 5, 2,18 д 
2,19, 35 8, 19 2,20, 19 ,8,2,20,2, 12 ,20,2,17, 
20,11, 5,21, 12 420,21, В,5,22, 1,20,22, 1,274 


- 
1780 DATA 2350012,4, 1471 4, 1342,3,2 
2,1,2,26,1,4,24,3,2,15, 4,3,2, 6; 4, 4,8,5,6 
,8,4,9,8,2,11,6%2,12,%,2,153, 1012114, T 2 
,18,12,3,14,14,5,22,14,5,4,16,7,10,16, 2, 
19,18,2,21,18,5 : 


1790 DATA 2,1,17,2,2,11,25,14,26,16,8,18 | 


,27,18,12,19,17,19,26,22 

1800 QUT2,8 

1810 READ IX,IY:IF IX+IY=@ THEN ഗ്മ 
ETURN 

1820 QUT12,1Y:QUT12,IX 

1820 FORI-QTO200: NEXT: БОТО 1810. i 

1840 DATA DD,21,68,D5,11,00,00,DD,ES,E1, 
മ, 1൭, മമ, മഴ, 2൧, 7൭ 


1850 DATA Ee, 27, 96,01 ‚97,28, 05, 3 ,മമ, 3D, 


20,FB,DD,7E, മര, Ай 


1860 DATA FS, ос, 79,Е6, 907,20,02,DD,23,F1, 


28,12,06,08, 7 ‚оз 
187@ DATA 01, А :Ғ6е,20,03,02,7А4,03,02,13, 
23,10,Ғ1,18, 14, മം 

1880 БАТА ов, 7 ,൧:, മമ, 7E 103,21, 74,Ғ6,10, 


02,92,78, 02,02, 15 


1890 DATA 23,10,EE,79,87,30, вв, 0൭ , മമ, മമ, 
FF,FF,FF, FF, SEF, FF 


1900 DATA FF,FF,FF,FF,FF,FF,FF,FF,FE,FE, 


FE,00,F7,F7, F7, മമ 


1910 DATA മമ, 18, 7E 。FF 。9F 。F9 。FF , 9, 5р, SD, 


49,2E,08,14,14,22 - 
1920 DATA 1D,1D,09,2E,48,14,52,72,5C, SC, 
48,2E,09,14,25,67 
1950 DATA 80,49,a4,55,46, 55 ,ба,55,7Е,Ғ7, 
AA, BF , BE 。FF , 7E , の 


1940 DATA 7Е,ЕҒ,55,Ғр,7р, FF,7E,00,81,FF, 
B1,FF,B81,FF,B1,FF 


1950 DATA 21,00,Ғ2,11,78,00,06,19,С5,Е5, 
05,28,7Е,22,77,22 
1960 DATA 10,ҒА,Е1,19,С1,10,Ғ1,С9 


2, 
yk 
24 
w: 


PC-BOOO 


N60-BASIC 二 マシ ン 語 


ひょんな こと か ら PiO 星 の 機密 情報 を 知 
っ て し まっ た あな た は , 無数 の 追手 を 振り 
切っ て 全長 700km の TUBE の 中 を ひたすら 
逃げ る の で す . 

画 プ ログ ラム ・ イ ン フ ォ メ ーション 


| x グラ フィ ッ ク が 大 変 良い . あ と , 自 機 
4 I E | が 後に 動け る と 良かっ た ネ 。 (A) 


プログ ラム の 説明 


この プロ グラ ム は すべ で て 機械 語 て 記述 
れ て いま す が 。 テープ か ら の ロー ド は 例 に 
よっ て I/O 〇 フォー マッ ト の BASIC IPL で 行 
な っ て いま す 。 な お プロ グラ ム ・ エ リア は 
B680H か ら C8D2H まで, ワー ク ・ エ リア カ 
83132൦ ൦൧411427, デー タダ ・ エ リア 


は CA42H か ら DF8SEH ま で と な っ て いま す . 


対向 機 の スピ ー ド が ミサ イル 並み … 


入力 記法 


Же 6001 に ROM& RAM カ ー ト у ッ ジ を 
装着 し , 電源 を 投入 し ます . 

൫ “How Many Pages? " 

АҒ, 

ӨРАСІС ブロ グラ ム を 打ち 込み ,. カモ セット 

ここ デー の に ーー グル し て る だ る で や 。、 ЖЕМ, 


に は 1 を 指定 


ソー ズ 


ザ ・ チ ュー プ ブ 


何ら か の ROM の 機械 語 モ ニタ を 持っ て いて , 


その モニ タ の ロー ド ・ モ セーブ プ 機能 を 使用 さき 
れる 方 は , この BASIC プログ ラム は 必要 
あり ませ ん . 
@⑩[/O 系 の 機械 語 モ ニタ で 機械 語 (B680H 
ലു 入 み テー プ に セー ブ し て 
くだ る 
ы ш idis in 
を ロー ド し ます . RUN を 実行 する と 機械 
語 を 読み 込ん で ゲー ム が 始ま り ま す . 
I/O 系 以外 の モニ タ を 使用 る れる 方 は , 
機械 語 を ロー ド 後 , B687H か ら プ ログ ラム 
を 実行 る きせ て くだ る い 


ЖІ 主 な マシ ン 語 ルー チン 


ー ク ・ エ リア の 初期 化 

FEA 

デモ 2 

画面 作成 

ROUND 変更 処理 
背景 の 表示 
ROUND 2 の 背景 の 表示 
NADY & 
| 敵 B の 動き 

英 B の ミサ イル 

ROUND 3 の 敵 B の 動き 
ROUND 3 の 敵 B の ミサ イル 
自 機 の 動き 
自 機 の ミサ イル 

種々 の チェ ッ ク 
ウエ イト ・ ル ー プ 

スコ ア , 距離 の 処理 
TUBE を 抜け る 自 機 の 動き 
TUBE を 抜け た 処理 


R2 主 な サブ ルー チン 


文字 の 表示 


HL に 表示 し た い 位置 の V-RAM 上 アド レス , DE に 文字 コー ド 列 の 先頭 アド レス , B に 文字 列 の 
長 さ を 入れ て コー ル す る . 文字 コー ド は 0-50 (# 3 参照 ) 
例 : B000 か ら 連 続 し て 0, 1, 2, 3, 4, 5, 6, 7, 8,9,10,11 と デー タ が 書き 込ま れ て いる と き , 


LD НІ, $E200 
LD DE, $B000 
LD B, 12 
CALL $C472 


CHiEBEEA2S50123456789ABEtZm15. 


キャ ラク タ の PUT 
音楽 1 
音楽 2 
音楽 3 


音楽 4 EXEC &HC855 で デモ の 音楽 を 演奏 する 


プロ グラ ム が スタ ー ト する と デモ が 始ま 
り ま す . タイ トル 表示 , 音楽 演奏 の 後 , キ 
ー の 説明 が あり ます . 

自 機 は カー ソル ・ キ ー て で 左右 に 動き 
+ (上 下 に は 動け ませ ん ). (SPACE キー £x 
ミサ イル を 発射 し ます . 

自 機 は ,1 機 し か あり ませ ん . まだ ただ, 途 
中 で 増え を る こと も あり ませ ん (自分 は 1 人 
し か いな い の で す /). だ だ し この 飛行 機 に 
は シー ルド が 張っ て あり , 敵 の 攻撃 や 接触 
に 対し て 2 回 まで は 防御 で きま す . 

シー ルド の 状態 は 画面 右 下 に 緑 一 黄 一 赤 
の イネ ンジ ケー タ で 表示 きれ ます 。 イン ジ ケ 
ー タ が 赤 の と き に ダメ ー ジ を 受け る と , H 
機 は 破壊 きれ て し まい ます . 


ROUND 1 


は や め ま し ょ う . スポ ー ツ を し ま L2 5, (秘密 戦隊 な の に 常々 と 名 乗る アカ レン ジャ ー こ と 海 城 ) 


前 方 か ら 敵 A が 体 当 た り 攻 撃 を か け , š 
gd ымен 38 
id. 敵 B の 速度 は 自 機 の 速度 より も は る 
か に 速い の で , НРО о < り 5 追い 抜い て 
行き ます . 接触 し な いよ う 注 意 し て くだ る 


英 A は 自 機 と 同じ 速度 で 前 方 か ら 飛 ん で 
š š+. 相対 速度 は 倍 に な っ て いる の で , 
か わす の は 下 難 の 技 で す . 

英 を 破壊 し な が ら 300km 飛 行 す る と ROU 


.ND2 に 移り ます (距離 は “DIST.” TRS 


れ て いま す . 


HOUNDe 


300km を 過ぎ る と 様々 な 機械 装置 が 壁面 か 
ら 飛 び 出 し て いる だ た だめ, TUBE は 曲がり く 
ね っ て いま す . その だ め 敵 は 追っ て きま せ 
^. 自分 自身 と の 孤独 な 戦い で す . 慎重 に 


75 


РД ro я 


新 ラ ウン ド 処 理 


背景 を 動か す 


スコ ア を 上 げ る 


ハイ ・ ス コア の 処理 


素早 く 判断 し て 自 機 を 操っ て くだ さい . 

距離 が 500km を 越え る と ROUND3 に 移り 
E. な お , ミサ イル で 壁面 を 破壊 する こ 
と は で きま せん . 


ROUNDS 


基本 的 に は ROUND1 と 同じ で す が , dk 
B の 攻撃 法 が 上 達し て いま す . 2 機 で 自 機 


を 壁面 に 追い つゆ た り , 前 方 か ら や っ て き 


いよ いよ ラウ ンド 2 へ 突入 


る の が 楽 な の で す が , 


道 を 曲がり ね ら す 


ゲー ム * オ ー バ パー と 表示 


音楽 1 の デー タ 
音楽 2 の デー タ 
54C | 音楽 3 の デー タ 
А | 音楽 4 の デー タ 


自 機 の デー タ 
自 機 の ダメ ー ジ 
自 機 の 爆発 1 
自 機 の 爆発 2 
自 機 の 爆発 3 
自 機 の 爆発 4 
ШАФ -I 
` | 敵 A の 爆発 1 
` | 敵 A の 爆発 2 
敵 A の 爆発 3 
| 敵 B の デー タ 
敵 B の 爆発 1 
| 敵 B の 爆発 2 
敵 B の 爆発 3 


| 文字 フォ ント 


0 1 2 
110 
с 


М 


て 自 機 の 後ろ 2 に 回 りこ ん 
だ りす る の で 注意 し て く 
TEV, 

700km を 過ぎ る と 晴れ て 
TUBE ¢ 7% 9, 真空 
中 で は 飛行 で き な い 敵 か 
ら 逃 れる こと が で き , 5 
な た だ の 勝利 し となり ま す . し 
あか も 。 こと まで いも る の は を 
う 容 易 で は あり ませ ん . 
勝利 を 称え る 音楽 を 耳 に 
する こと は 難し いで し ょ 

う (し か し 可能 て すす /). 


sea 


この ゲー ム は 非常 に 動き が スピ ー デ ィ ー 
な の で , コッ を つか む ま で は 瞬く 間 に や ら 
れ て し まう か も し れ ま せん . 


コツ 1: 下 手 に 動か な いこ と 
片手 は 常に ISPACE| キー を 押さ きえ , ミサ 


ィ イル を 連射 し ます . 自分 が 動か な い 限 り 敵 
A に 体 当 りき れる こと は あり ませ ん . 


コツ Pe: 画面 の 下部 を 注視 せよ 
敵 B は 下 か ら 現 われ る と 同時 に ミサ イル 
を 射 っ て きま す . まず これ を 素早 く か わす 
こと が 大 切 で す . 必ず か わす こと が で きる 
ょ うに な っ て いま す . た だ し 勢い 余っ て 璧 
面 や 敵 A に 衝突 し な いひ よう, カー ソル ・ キ 
ー は 瞬間 的 に 押 き な けれ ば な り ま せん . 


タイ トル 画面 の グラ フィ ッ ク ・ デ ー タ 


PLAY 命 令 の MML で “ 
と 入っ て いる 


メッ セー ジ な どの 文字 列 コ ー ド が 順に 入っ て いる 


28 バ イト 


この 順に メモ リ に 
入っ て いる 
※ キ ャ ラク タ を 変更 され る 場合 は 
この 部 分 の 28 バ イト は 必ず 7% 
影 " と し て 使用 し て くだ さい 
(機体 が は み 出 な いよ うに ). 


7 バイ ト 


キャ ラク タ ・ コ ー ド 
0+0 +1 +2 


+3 +4 +5 +6 
bod » * 


D. A F” ` 


4 OPQ 


` " 
コツ 3: 敵 の 動き を 読め 
特に ROUND3 で 必要 で す . 85:42 
ょ けれ ば いい と いう も の で は あり ませ ん . 
よく 考え て 上 方 か ら 〈 く る 敵 B を 狙い , 壁面 
に 追い つゆ られ ね よう に し て くだ る さい 。 


プロ グラ ム は すべ で て 機械 語 で すか ら 大 幅 
な 変更 は で きま せん .。 けれ ども プレ イ し て 
みて 「 こ れ は お 手 上 げ だ ./」 と 思わ れ だ た 方 
は すか きず |STOP| キー を 押し て (ESC) も 
効き ます ), 以下 の 変更 を お 試し くだ る さい. 
スピ ー ド 

ROUND1, 3 の ウエ イト ・ ル ー デ の カウ 
ンタ は BA69H, BA6AH の 2 バイト, また だ 
ROUND2 の カウ ンタ は BAC9H, BACAH 
の 2 バイ ト に な っ て いま す . お 望み の 数 値 
を 16 進 数 4 桁 に 直し て 下位 , 上 位 の 順に 書 
き 込 ん で くだ きい . 

初心 者 の 方 の た め に 例 を 挙げ ます と , X 
ウン タ を 300 に し だ けれ ば , 


10 進数 の 300 は 16 進 数 で 012C な の で 
POKE &HBA69, &H2C 
POKE «““НВА6А, &H01 


と すれ ば 良い わけ で す . 


p 最近 "これ か ら の CPU は , 16 ビ ピッ ト だ 1" な ん て 言っ て いる 人 が いま す が , それ は 間違い だ と 思い ます . 8 ビッ ト は , 16 進 数 を 10 進 数 に す 
16 ビ ピット だ と そう は いき ませ ん .。 PUD, これから は , 8 ビッ ト と 32 ビ ピット が 生き 残っ て いく の で は な いか と 思い ます . 
それ か ら , 日 立 の S1 で す が 、 あ の 機械 は すご いと 思い ます . FOR I= 0 TO10000 : NEXT» 6 b, А=А+ 1 を 入れ て も, 18 秒 で らい し か か 


か ら ず , PAINT な ど は は ほん の 1 秒 で す . な お , CPU は 8 MHz (Z80 比 ) で す . Р.5.1 PC-6001 で よく UNLIST る きれ て いる も の が あり ます 


各 ROUND の 到達 距離 


12 C35 DH. С25ЕН 


52-3 こし 3 8 T ku T 831 
RO S—ELGS2S9H, C32.AH 


以上 の アド レス に お 望み の 数 値 を スピ ー ド 
の 変更 と 同様 に 書き 込ん で くだ きい . 


ジョ イス ティ ッ ク の 変更 


КЕМ 
КЕМ 
КЕМ 
КЕМ 
КЕМ 
КЕМ 


БЕМ 
БЕМ 
БЕМ 
БЕМ 
БЕМ 
DATA 15,C2,06,1B,CD,95,25,006 


B680: 00 
B688: 00 
E690: 1A 
B698: 52 


7a Va e uu a Pu n lu Pu Pun fu Pu Pu fu Pa Ju Pu Pu fa Pu Pu Pu 
^ THE TUBE ん 
BY Ү. TOYOSAWA (C) 
1984 
OBJECT 
QOB580H"ODFS8EH ' 
FOR 52КВ SYSTEM 
イヤ イイ イイ イイ イイ イイ イイ イイ イイ イイ イイ 4 


------ BASIC ІРІ ------ 


B6A の iC9 2 


13൭൧9 : 2E 
ലമ; 52 


вва: C9 3 


50൧0: 2E 
B6C8:23 
B6D0: 77 


ーー ーー ーー ーー ーー ーー HÀ e ín ーー ке эче а — ーー 


B700: ЗЕ 


B708:01. 


B710:11 
B718: BO 
B720:11 
B728:1A 
B730: 00 
B738:11 
B740:CD 
B748: ВВ 


B750: の の 
B758: 3E 
B760: BS 
B768: E2 : 
B770: BØ 
В778:06 


B780:FC 
B788:11 
B790:21 
B798:C4 
В7А0:12 
8768; 82 
B7B0:C2 
B7B8:21 
B7CO: CD 
B7C8: DA 
B7DO: AØ 
B7D8: 49 
В7Е0:72 
В7ЕВ:5Е 
B7FQ:F6 
B7F8:00 


が , POKE8403, “НЕЕСІ5Т797:44522122937, 


番号 


Ese, 


ШЕРІ 


すぐ に わか る と 思い ます . だ いて い の 人 は 
20 回 も や っ て いれ ば ROUND2 に は 到達 で 
$5215CT. 


前 作 の “ダー リン 危機 一 髪 /" は 登場 す 
リス ト 1 THE TUBE BASIC!) Z b അ 


рата 
рата 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


05,С0,70,16,ҒЕ,АҒ,20,Ғ7 
10,F7,21,22,D8,06,06,CD 
70,15,77,22,10,F9,CD, 26 
1B,6F,32,38,D8,21,76,25 
CD,CF,20,21,26,D8,CD,CF 
30,CD,94,25,24,22,D8,ED 


4B,34,D8,1E,00,CD,70, 1൧ 
57,82,5F,72,22,0B,78,B1 


/20,F2,CD,70,165,BB,CA, AA 


14,Ср,АА,184,21,85,05,С2 
CF,30 


CLEAR S30,&HB680 


BB の の :E1 
BB808: DE 
BB1 の :E2 
B818: B3 
B820: C8 
B828: F8 
B830: 78 
B838: 21 
BB4 の : 77 
8848: E2 
В850:17 
B858: 00 
B860: 5D 
B848: 06 
B870:21 
B878:FC 


B880: 77 
B888: 18 
B890: 77 
B898: 3E 
B860: 52 
B868:21 
BOBO: 77 
B8B8:E2 
B8C0: 77 
BSCS: OE 
B8DO: 23 
B8D8: SF 
2800: BC 
18868: 99 
B8F 0: CD 
388: CD 


eio 


る キャ ラク タ に 疑っ て み だ た ので, 今回 は 音 ・ 
楽に 力 を 入れ て み ま し た だ た. も ちろ ん , 全曲 
オリ ジ ナ ル で す . 

肩 の 疾 ら な い 単純 な ゲー ム で す の で , b 
ょ っ と し た だ 時 間 つ ぶし に 気軽 に 遊ん で いた 
だけ だ ら と 思い ます 。 
参考 文献 

*Z80 マ イコ ンプ ログ ラム テク ニレ ウ グ /"。 
電波 新聞 社 Ш> 


FOR I-£&HF878 TO &HFBD1 


: READ А% 
: POKE I,VAL ("®&Н"+А%) 
NEXT I 

EXEC &HF87C 


EXEC XHB687 
END 


a !JAHR2 THE TUBE ഴാ. 810൨ അ 


ーー — ーー кәм ーー ーー ーー ーー ーー ーーーー көн кен көме көн. көн. ж-е ーーーーーーーーーー ニ ーー көне MP a 


B?00: EB? 
E908: D9, 
B910:02 
B918:10 
B920:79 
B928:23 
E930: 21 
B938: CD 
B940: 89 
12948; SE 
B950:19 


– ------ — — — — — — — —— — അം ーーーーー 


B980:C4 
B988: C8 
B990:E7 
E998: 05 
ВЭА: 72 
ВАВ: ЕВ 
В9В0:29 
B9B8: 06 
BC : CD 
B9C8:11 
നഗ; 21 
B9D8:C4 
B9EQ0: CB 
B9E8:F2 
B9FQ0: 05, 
B9F8:72 


BAQQ:FF 
13608 : 22 
ВА10:С4 
18618: ВВ 
BA20: EC 
BA28: AF 
ВАЗ :р7 
BA3S8:F3 
ВА40:60 2 
1048: 18 
BASO: 20 
ВА58: 3C 3 
BA60: CD 
BA68: 21 
ВА70:СА 
BA78:C9 


BA80: C9 
BA88: 52 
BA90: B8 
8078 ; DD 
BAAD: ЗА 
BAAS: 2A 
BABO: 19 
BABS: 00 
BACB: 20 
BAC8: 21 
варе: B8 
ВАрВ:Е2 
BAED: 23 
BAE8:01 52 
ВАҒ@: Р, 
BAF8: CD 


(Z80D.12MHz が 出れ ば いい な と 思っ て いる ポテ トチ ッ プ ス の こ な ) 


pio 


| リス トク 2 THE TUBE マシ ン 語 リス ト 
BB の の :C5 16 ВВ Сі 10 Е7 АҒ 


BD48:11 BF80: B8 


BB08: 52 2 


ВВ10:СА 
ВВ18:21 
BB20: AF 
BB28:FC 
BEZA: ED 
BB38:FA 
BB40: C9 
BB48: C9 
BESO: CA 
BBS8: 23 
ВВ60:23 


ーーーー n ا‎ —— — — — — —À — — — — — 


ーー ーー ーーーーーーーーーー ーーーー HÀ n M — ーー ーーーー HÀ ーー P MÀ À i e n n n i n ーー 


BCOQU: 22 
1308; рғ 
ВС10:71 
BC18:20 
BC20: 20 
BC28: 11 
BC350: 06 
ВС58:10 
ВС40:11 
ВС48:06 
2050: 2A 
1059: 1 の 
200: СА 
BC68:F9? 


ВС70: 3A < 


BC78: ED 


—— —À കോ — — — — — —À — — — —À — — — —À — —À —À — y 


Sum: 14 


BC80: 07 
BC88: 00 
BC90: C9 
BC98:01 
BCA の : C9 
BCA8: DD 
BCBO: OC 
BCBS: 58 
BCCO: BC 
BCC8: 22 
всре: CS 


BDO8: 06 
Вр10:54 
Вр18:10 
BD20: 20 


BD28: 13 ` 


BD39: 06 
BD38: CA 
BD49: 20 


BDS0:B8 2 


BDS38: 06 


മമ: 3B 


BEQ8: ED 
BE10:06 
BE18: SF 


BE20: 52 5 


BE28:E2 
BESO: 2 

BE 3 日 : CA 
EE 4 の : B7 
BE48: 06 
BESO: の 6 
BES8: 60 
BE60: の 6 
BEB: 40 
BE 7 の : の 6 
BE 78: 20 


бит: 28 


BEB の : ЗЕ 


ВЕ88: 47 : 


ВЕ90: 38 
BE98: 32 
BEAD: BE 
ВЕА8: 2F 
BEBO: 06 
ВЕВВ: 60 
BEC0: ES 


BEC8: 52 3 


BEDO: EF 
BED8: BE 
BEEØ: 1А 
ВЕЕВ: 19 
EEFQ: CA 
8608 : 2F 


BF の の : ВВ 
HBF の 8 : 20 
BF10:60 
ВҒ18:54 
BF 20: 52 
BF28:CA 
BF 30: 36 
BF 3 日 : 19 
ВҒ40: 2А 
ВҒ48: 19 
BEF SO: AF 
BF S8: СА 
BF60: の 5 
BF68: 06 
ВҒ70:10 
ВҒ78:77 


Sum: ES 


BF88: の の 


൭168: 23 
С@20: 11 
CØ28: CA 
C050: B8 
C058: ВА 
C040; ЗА 


൧൭49: : 


€മാമഃ FF 
C058: 28 
C060: 41 
C068: ЗЕ 
С@7@:@1 
C078: 2A 


Sum: ЕВ 


C080: 52 
CD88: の の 
С090:1Е 
C098: xE 
С@А@:18 
САВ: 11 
COBO: 01 
COBE: E1 
COCA: 03 
CoC8: š 
CODO: 2 

CODE: 


p PiO'84 年 11 月 号 p.183"PiO バ ザー ル を 利用 され る 方 へ "の 所 の "相場 "に つい て 一 言 . ソン フト 周 辺 機器 等 が 付い て くる な ら 実 際 の 相場 を 上 回 っ 
て も いい と 思い ます . だ いだい 中 古 の マイ コン ショ ッ プ で の 相場 な ん て , 売れ る 機種 は 禁 落 せ ず , 売れ な いり 機種 は 禁 沙 し ます (その マイ コン 
馬 、 そ の も の に 関係 な く , 特に メー カー の 違い で ). し か も , その よう な 店 に は , 売れ な い 機種 の ソフ ト は だ いて いあ り ま せん . 店 は 売れ な い 機 種 
D を 売る よう な 努力 も ろく に せ ず 、 た だ 安く する ば か り ( そ ん な こと で 相 場 が 決ま る こと 自体 腹立たしい の で す が ). と は いっ て も , この 相場 


pio 


| リ スト 2 THE TUBE マシ ン 語 リス ト 
C1C8:00 : C420: 10 C648: B8 
C1D0: 4А C408: 05 C650: の の 
C1D8:42 : С410:11 C658: の の 
C1E0: 3A С418:21 С660:79 
C1E8:32 C420: CD С668:06 
じ 1F の 』 3D C428: C8 Сь70: 10 
൧൨0൦8; SC C430: SB C678: ЗЕ 
SEAS ^ EC D EC EA ола T GSS C438:38 
Sum: @% C440:11 Sum: 9A 
C448: 21 
C200: 3 C450: の の C6 ヨ の : C3 
C208: CA C458:FD С688:11 
С210:0А C460: CD C690: 77 
C218: CS C468: BB С698:18 
C220: 00 C470:97 Сода: 05 
228:706 C478:6F CéA8: СА 
С250:1В COBO: 77 < 
C238: さじ COBB: 14 
C240: 3D С5С@:2А 
C248: 03 Ce6C8iC5 : 
C250: 200 сре: の 6 
C258: 76 CéD8B: 30 
C2640: 19 0: ЕС 
C268: B8 CoE8:18 
C270: EF 
C278: Аё 
Sum: BQ Sum: 44 
C280: 2 C700: 60 
C288: 28 C708: DD 
C290: 28 C710:F9 
C298: 28 C718: CD 
C200: СА С720:АҒ 22 
С2А8: СА C728: 20 
C2B0: B8 C730:14 
C2B8::55 Sum: D4 C738: ЗА 
CACO: 5А C740:C2 
C2C8: 03 C500: 04 C748: 77 
C2DO: 2B C508: 1C С750:С2 
C2D8: 2А C519: 1C C758: CA 
C2E0: SF C518:10 
C2E8: 3A C520: 1 の 
C2F0:14 C528: 20 
C2F8:C09 C330: AF 52 
--------------------------------- С558:06 
бит: 1F C540:01 Sum: Có 
C548: の 6 
C300: CA C550: E2 C780: 26 
C308:CA C558: 01 C788:07 
C310: 05 C560: 30 C790:18 
C318: 72 58 : E4 С798:19 
C320:DA C570: C9 C70: 255 
С528:11 C578: 1C С7А8: 32 
C530: 38 C7B0: C8 
C338: 0A Sum: 14 C7B8: 00 
C340: CD С7С0: 77 
C348: 21 C580: 10 C7C8: Ø6 5: 
C350: ЗА C588: FO C7DØ: СА 
C358: BA C590: の 6 C7D8: 36 
CZX60:ED C598: B1 C7E9: 77 
C368: 06 С5А@: の の C7ES: C2 
C370: ВЕ C5A8:C8 C7F0: B7 
C378: EC CSB0: 06 С7Е8: 5С 3 
inis wa 228 туне з ааа а лодар ажа SK шс са tt 599: B8 
Sum: 94 CSCO: B7 Sum: 3A 
CSC8: SA 
C380: AF С500: 1А C800: 29 
388:E2 C5D8: 19 C808: B8 
C390: C35 5 CSE の : ВВ C810: DA 
C398:F0 С5ЕВ: 32 C818: CA 
СТАВ: C CSFO: SA C820: 11 
CZAS: ЗЕ CSF8: CD C828: 24 
C3BQ@: SA ` C830: 2F e 
8: S8 C838: 18 55:62 
CSCO: SC C840:CA^ 22 16:09 
CSCS: 21 C848: の の 19:45 
C さ D の : の 6 C608: 7C C850: 1 1 ഉ; SC 
C3D8:FC C610:22 C858: 18 21:1E 
СЗЕЙ: 21 С618:С4 C860: 4С 
C3EB: 00 C620: EF C868: B7 
മഃ; 42 С628:11 C870: の の 
C3F8: AF С650:С6 878: 1B 
------------------------------- C638: 47 
Sum: 48 C540: CD 


か らち か な り は ずれ る と 人 は 買わ な いで し ょ う . し か し , 中 古 パ ソコ ン に 何ら か の "サー ビス "が ある な ら わ ぎざぎざ わざ マイ コン ショ ッ プ の 相場 に 合 

わせ る 必要 は な い の で は な いで し ょ うか .. 売る 努力 あろ くに し な い 店 の 相場 か の ら か な り は ずれ て も , それ な り の 価値 が あり ます . バザー ル の 

相場 よ り ぉ も 安い 店 は いく ら 6 で も あり ます . し か し , そこ で 買う と 結 極 バ ザー ル に は が き を 送る か も 知れ ませ ん よ . P.S.1 PiO で PASOPIA- ; 

7 を 売る 奴 が いる . 売る こと な ど 考 える 暇 が あっ た ら ,。 と きど き PiO に 載る ゲー ム で も 打ち 込め / (WATER-LAKE ) 79 


eio 


| リリ スト 2 THE TUBE マシ ン 語 リス ト 


E880: ØA 
C888: の 6 


C890: SF : 


C898:F8 
C840: C9 
СВАВ: 85 
C8BQ:11 
C8B8: 06 
C8CO: 10 
CECE: 06 
CBD の : C3 
C8D8: 1р 
C8EQ: 25 
СВЕВ: 18 
CBF の : の の 
CBF8: 12 


C700: ØC 
С908:15 
C910: 22 
C918: 18 
C920: 0E 
C928: 51 
C930: ØC 


С958:10 


C940: 0A 
C948: ØB 
С950:18 
С958: 51 


С960: 2А 2 


C968: ØB 
С970: 51 
C978: ØC 


Sum: 86 


C980: OE 
C988: 51 
С990:21 


C998:00 : 
C960:2C 2 


САВ: 12 
C9B0:1C 
C9B8:1B 
C9C0: 02 
C9C8i ØC 
С900: 1 の 
C?D8: の 1 
СОЕ@:ЕА 
CPEB: ES 
C9FQ0: 60 
C9F8: 00 


бит: 33 < 


СА 0: 00 
CAQ08: の の 
CR 1 の: の の 
CA18: 00 
CA20: の の 
СА28:07 
САЗ0: の の 
CA38: 00 
Са40: 52 
СА48: 35 
СА50:55 
CASB: AA 
CAB: АА 
CA68: EE 
СА70: АА 
СА78: АА 


САВО: BB 
CA88: BB 
CASO: АА 
СА9В: АА 
CAAO: EE 
CAAS: АА 
CABO: AA 
CABS: ടട 
CACO: 55 


80 — 


൨൧൧8 ; АА 
CADO: AA 
CAD8:9E 
CAEQ: АА 
CAES: AA 
CAFO: AA 
CAF8: 6A 


CBOO: АА 
മദ; AA 
СВ10:9Е 
18: Аа 
CB20: AA 
28: AA 
0: : AA 
8: AA 
СЕ40: АА 
СЕ48: 6E 
CBSO: АА 
CBS8: AA 
СЕЙ: АА 
CBRB68: SS 
CB70: АА 
878: AA 


— — — ーー ーーーーーーーーーーーーーーーー — — — — — — — — — — — ーー — — — — — — ーー 


Sum: Q3: 


CB80: óE 
CB88: AA 
CBSO: A^ 
CB98: AA 
CEAQ: BE 
CBAS: AA 
СЕВО: AA 
СВВВ:ЕЕ 
CBCO: АА 
CBC8: АА 
CED の : AA 
CBD8: 55 
CBE の : AA 
CEES: AA 
CBFQ:ED 
CBFB8:AA 


ーー ーーーー mA ーー ---2--.-------------0--- сз —— СЕЕ — — ーー ーーーーー — -— 


Sum: A7 


CC の の : AA 
CC の Bi AA 
01: АА 
CC18: AA 
CC20: АА 
СС28:Е6 
СС20: АА 
СС58:АА 
СС4@:АА 
CC48: AA 
CCS0: АА 
CCS98: АА 
CC60: Eó 
CC68: AA 
CC79: АА 
CC78: AA 


ーー ーー ーー ーー ーー —— ーー —— ーー ーー — — —— —À — — — — — ーーーーーーーー ーー — —— — 


Sum: 18 


CCB の : 55 
൧88: АА 
CC90: АА 
CC98:E6 
CCAD: АА 
CCAS: АА 
മഃ A9 
CCB8: BB 
CCCO: AA 
CCC8: AA 
CCD の si DA 
CCD8: AA 
CCE の : АА 
CCE8: A? 
CCFO: SS 
CCF8: АА 


=~ 


മമ: AA 
CD の : AA 
Ср10:АА 
Ср18:АА 
Ср20:55 
CD28: АА 
CD30: 55 
CD38: AA 
CD40: SS 
CD48: ടട 
CD59:57 
CDS8: AA 
CD60: AA 
CD68: AA 
CD70: АА 
CD78: AA 


Sum: Ғ9 


CD80: AA 
CD88: A7 
CD99: の の 
൧൭8; АА 
CDAD: 00 
CDA8: A9 
CDBO: の の 
CDB8: の の 
CDCO: 17 
CDC8: മഥ 
CDDO: АА 
CDD8: の の 
CDEQ: А9 
CDE8: 01 
CDF の : の の 
CDF8:1F 


CE の の : 55 
CEOS: AA 
СЕ10:00 
CE18: AS 
СЕ20:55 
СЕ28: 54 
СЕЗ@:5Е 
CE38:FD 
СЕ40: АА 
СЕ48: 05 
СЕ50: Аб 
CES8:FF 
CE60:FD 
CE68:FF 
СЕ7@:Р5 
CE78: 56 


А0: ЕА 


................. ات ت ا — 


Sum: 44 


CE80:17 
CE88: AS 
CE90:57 
СЕ98В: А5 
СЕАВ: FF 
CEAS: Аё 
СЕВ: А7 
CEB8:1F 
CECO: AA 
СЕСВ:97 
CEDO: А6 
CED8: AA 
CEEO: 96 
CEES: 17 
CEFO: SF 
СЕЕВ:АА 


— — — — EC. 


СҒ00: 1F 
CF08: 96 
CF 1 の: AA 
CF18: 9A 
CF20: 1D 
CF28:7F 
CF 30: АА 
CF 38: SF 
CF40: 9A 


CF 48: AA 
СЕ5@:58 
CF58: SD 
CF60: 55 
CF68: АА 
СЕ70:7Ғ 
CF78:68 


CF80: AA 
CF88: 68 
СЕ9@ 735 
CF?8: AA 
CFAO: АА 
CFA8:7F 
CFBO: AQ 


CFEB: AA 


CFCO: 6 の 
СЕСВ:76 
CFD の : の の 
CFDS: AA 
CFEQ: FF 
CFE8: 05 
CFFQ: АА 
СЕЕВ:А@ 


Sum: 72 3 


D200: Dé 
D の の 8 : 00 
0010: АА 
൭18: FE 
р020:00 
DO289: AA 
00:20:80 
D038: DA 
0040: 55 
0048: AA 
D の 5 の : FE 
൫58 : 00 
0020: AA 
D の 68: 80 
D の 70 の : 58 
D の 7BiFF 


D の 8 の : AA 
0098: FA 
р090:01 
DQ98: AA 
ഉമദമ: മമ 
роде: 58 
DOEOQ:FF 
DOES: AA 
DØCA: FA 
D の CB: の 1 
DODO: AA 
D の DB: മമ 
D の E の : 60 
DOES: EA 
DOFD: AA 
DOF8: EA 


D100: 05 
D108: AA 
D110:01 
21 19: A0 
Di20: AA 
Di1 28: АА 
Di 30: EA 
р158:07 
D140: AA 
D148: の 1 
D150: 80 
D158: AA 
D1 6 の : АА 
21 ൭9: AA 
D170:17 
р178:АА 


Sum: 7F 


D180: 05 
D188:80 
D190: 55 
D198: 55 
൧ 1 ദമഃ AA 
21൧8: 1F 
Di BO: 55 
D1 Bi の 7 
D1CQ:01 
1 (8: АА 
Di DO: AA 
൧ 108: AA 
D1EQ:SD 
DIES: AA 
р1іғ0: 17 
D1F8:02 


D200: の の 
D208: の の 
D210: 355 
D218:7D 
D220: 01 
D228: 1D 
D230: の の 
D238: 00 
D240: 00 
D248: AA 


D290: 75: 


Sum: ёр 


D280: の の 
D288: D6 
D290:07 
D298: 7D 
D2600: の の 
р2А8:00 
2210; 00 
D2B8: の の 
22200; DA 
D2C8:07 
р2р@: Ғғ 
D2D8: 00 
р2Е0:00 
р2Е8: 55 
р2ғ0: 55 
D2F 8:55 


D308: FE 
D310:55 
D318: 55 
D320: FF 
D328: FF 
D330:FF 
D338:FF 
D240: AA 
D348: FF 
D350: FF 
DSSS: FF 
D360: FF 
D368: AB 
D さ 7 の :FF 


D378: 357 : 


D380: 41 
D388: 2D 
D390: 46 
D398: 2D 
DIZAO: 51 
р5А8:47 
൧:20; 2E 
DSBS: 2E 
р5С0:22 


55:55 


m= === 54 


A332 

ЕҒ:63 
ЕЕ: АЗ 
ҒЕ: ЕВ 
FF:F8 
РЕ: АЗ 
FF:4E 
ҒЕ: А8 
ЕР:9Ғ 


55:ЕЕ 


D3C8:43 


D3DO:52 3 


3D8:41 
D3EQ: 35 
D3E8: 54 
D3FO: 2E 
D3F8: 37 


bob P P Bw 
P O T O MME 


s 
х < 
- 
= 
m 
-- 
pe] 
2 
“ғ 
E] 
„ч 
з 
で 
“<s 
4 
E] 
ж < 


Ç 
4 0 
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PIO 


リス ト 2 THE 


D600: 55 
D608:41 
D610: 31 
D618: 54 
р620:41 


D628:46 52 


D630:31 
D638: 31 
D640: 4F 
D648: 46 
0650: 42 
D658: 43 
0660: 47 
D668: 42 
D670: 42 
D678: 46 


D728: 47 : 


D730: 2D 
D738: 46 
D740: 43 


D748: 54 2 


D750: 46 
D798:47 
D760: 46 
D768:47 


TUBE マシ ン 語 リス ト 


05:21 


D848:FF 
D850:FF 
D858:33 
D860: 52 
D868: AA 
D870: の の 
D878: 30 


DaBg:EF 
DABS: 75 
6൦൭; ØA 
DA98: AA 
радо: BA 
DAAB: 50 
DAB の : 30 
DABS: 30 
DACO: 50 
2൧0൧9: 50 
DADO: 50 
2൧൧8 ; FC 
DAEQ: SC 
DAE8: 55 
DAFA: 6D 


DE の の : ØA 
рвов: AA 
2110: 8A 
2119: 10 
DB20: 350 
DB28: 10 
рВ50:51 
DE.3 日 』 11 
DE402: 21 
DB48: 24 
DESO: の の 
DBS8: 00 
DB60: 41 
DB68: 51 
DB70:45 
рв78: 1 1 


DB80: 10 
DE88: 10 
DESO: 00 
DB98: 00 
DBAO: の の 
рвав: 00 
DBB の : 00 
DEES: の の 
DBC の : 20 


рвсв: 00 


DEDO: の の 
DBD8: 00 
DBEQ: 01 
DBEB: 00 
DBF の si 1 の 
DBFBi CC 


бит: FD 


ОС@@:РЕ 


DC の BiFC 2 


DC1 の :FF 
2618: FF 
DC20: EF 
DC28:EE 
DC30:76 
DC38: 32 
DC40: 52 
DC48: 30 
рс50: 350 
DC58 : 00 
DCó6Q0: の の 
DC68:CC 
рС7@: FF 


DC78:DD : 


DC80: DF 
൧൧88 : 55 
DC9Q: DF 
DC98: 66 
DCAQ: 76 
DCA8:32 
DCBQ: 32 
DCB8: 30 


DCCO: 30 ! 


С ° p だ れ か 6502 の マシ ン 語 の 覚え 方 教え て くだ さい . し か し 不思議 で す 、 こ れ と いっ た テキ スト も な い の に . な に か いい 本 で も ある の で すか ? 
KO KO あっ た ら 教 えて くだ さい . PS HOLS の 画面 きれ いで すね . . P.S.2 つい に VIC の USA SOFT を 手 に 入れ る 方 法 が わか っ た . 正月 に は , 
ロー ドラ ン ナ ー を 手 に 入れ る ぞ 1UBGM BETLES"I SAW HER STANDING THERE" 
| I "E `  ( 昔 は アッ サン ヌ は PB&VICUSER だ っ た が 改め て ASK ME WHY に な っ た ASK ME WHY) 


, ` Ë . 2 
uM | à 4 


DCC8: 00 
DCD の : 00 
DCD8: DØ 
DCEO: DC 
DCEBiD の 3 
DCF0: 45 
DCF8:05 


2209: 04 
DD10:44 
DD18:04 
рр20: 50 
DD28: 04 
рр50:10 
00:28:00 
DD4 の : の の 
DD48: DQ 
22-50: DC 
DDS8i の の < 
DD6 の : 03 
DD68: の の 
DD 7 の : മഥ 
DD78: 00 


DD8 の : の の 
21298: の の 
рр90:00 
DD98: 00 
2൧00; 00 
DDAS: 00 
DDEQ: 00 
21019: 00 
DDC の : の の 


DDC8: 00 
DDD の : 00 
DDD8: 20 
DDE の : の の 
DDEB8: 00 
DDF: の の 
DDF8: 00 


Sum: 00 


DE の の : の の 
DE の : 00 
DE10: の の 
DE18:00 
DE20: 00 
DE28:94 
DEZ9:54 
DE 38: АФ 
DE40: 9A 
DE48: 56 
DESO: Аб 
26:58 ; PA 
00൭; PA 
206 ൭8 ; 66 
DE70: 66 
DE78: SA 


Sum: 8A 


DEB の : ФА 
DE88: 66 
DE90: 56 
DE98: 9A 
DEAQ: 66 
DEAS: PA 
DEBQ: Аё 
DEBS: 66 
ПЕСО: 6A 


рЕСВ: 66 
ПЕРО: PA 
DED8: 66 
DEED: 66 
DEES: SA 
ПЕРО: Аё 
DEF8: 9A 


Sum: 9C 


рғ00: 94^ 
2608; 66 
DF 1 の : 66 
DF 18: 66 
DF 20: 9A 
21-28 : АА 
DF 3O: АА 
DF38: БА 
DF 4 の : БА 
DF48: 9A 
DF5 の : AA 
20-58: АА 
DF 6 の : АА 
ОЕ&8:9А 
DF70: АА 


'DF78: 56 


DF ヨウ : AA 
DF 8 : 55 


Sum: FF 


S 
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s" "I гісі АЯТ 指示 


› ҚА AR ри p 
T ЕС, Ж 
専用 置台 価格 4.500 円 г)! == 4; 


@?)7 IA GINS ഗന A TE УІН ന്നാ 
使用 例 Z/g り 読む こと が で きま す 。 


(ооо)оо «нан 


@ ク リア ライ ン G は 、 リス ト を 確実 に ホー ルド し ます の で 両手 が 使え 、 ス 
൭8427770. Ee | 
|) у, オプ ショ ン ( 専 用 置台 ) < ブル ー ス モー ク > ビー ティ に イン ブッ ト で きま す 。 
Bii 大 変 便利 て すか 、 e サイ ズ は 2 種 信 汗 ミ 場所 は わずか な スペ ー ス で よく 、 さ ら に 専用 置台 (オプ ショ ン ) を 


DOORN EOE AV 


O sve 45cm タ イフ ・50cm タイ フ 


使用 すれ ば 、 177 す 動 作 が 最小 限 で すみ 、 入力 時 の 疲 
Q コリ ア ョ イン 本体 価格 9.500 円 労 が 軽減 され ます 。 
൫ 173065 ൫ 27954256 本体 価 格 9.500 円 3.500Ғ3 ФН で きる リス ト の 用 紙 は 5~30cm 忠 で 、 長 さ は 自由 で す の で 長い 
人 J リア ョ ライア 5 Š デー ター も 折ら ず に 読め ます 。 
BREE セッ ト 価格 13.500 | ө) ഗഡ 
LL LUPIS (45cm 巾 ・50cm 巾 ) 又 は 、 パ ソコ ン の 機種 を 必ず お 書き く た さ い 信 そ の 他 横 書き の デー ター や 文面 、 図 有形 の 座標 を 正確 に 読む と き に 
いろ いろ と ご 利用 で きま す 。 


@ カ タロ グ を ご 希望 の 方 は 誌 名 を ご 記入 の 上 <60 円 切手 > を 同封 し て 当社 宛 へ ご 請求 下さ い 。 


| % ダ イヤ ワイ ト 株 式 会 社 


леса 650 神戸 市 中 央 区 栄町 通 5 丁目 1-17-205 人 容 (078)351-2601⑯ 
മ ജമ ഞ്ഞ്‌ SS - — шшш шн ss киш — БЫШ БЫШ тән БЫШ w 


HHA YJ ЕФА-О-О 


を 現金 書留 ики XU MTA C 
振替 口座 ズ 神 戸 1-3516 
支店 当座 No9000493 
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PC-6000 ジ 


№0-ВАЅІС + Y V > 8 


шл 


ここ は 2.5 次 元 の 世界 に ある | 国 . 以 前 か 
ら 仲 が 悪い O 国 が , 最近 に な り と うと う 無 
差別 タマ ゴ 破 壊 作戦 を 開始 し だ し た . IGI 
で は 集会 を 開き , 誰が 卵 を 救い に 行く か 議 
論 に な っ た が , お 互い に 人 (8?) に 譲り 
合い , 誰 も 俺 が と いう 者 は いな か っ た . 

そん な 中 , 国王 の 息子 の 1 鳥 ( 1 A.) РіО 
BT x ME > 7-2, 1 鳥 で タマ ゴ を 救い 
に 旅立っ た の で あっ た -. 
画 プ ログ ラム ・ イ ン フ ォ メ 


| Ne0-BASIC 
| マシ ン 語 9500--АТҒҒ 


ーション 


PiO 君 が アヒル に 見 えて し まう の 
だ けど …. で も 画面 の 上 下 , 左右 
が つなが っ て いる の が 面白 い .(A) 


൫൫൭൫൭൭൭൫൭൭ т 
%% 900577999 ‹ 
മെ; 
൫൪ 
まず PC-6001 を 持っ て いる 人 は , ROM: 
RAM カー トリ ッ ジ を 入れ 忘れ て いな いか > 調 
べ さて くだ さい 。 それ か ら 。 ペー ジ 数 を 3 に 
Lt. BASIC*TAJI UL, 7-742%-76 
i7. 

Же, PiO 1/0 に 載っ だ モニタ (Еж 
ニタ ,。 新 マシ ン 語 モニ タ な ど ) で マシ ン 語 
を 入力 し (ペー ジ 数 は な る で 〈《 1 で ), BA 
SIC の 後に モー ブ し て くだ るい 
PiO S&L (7 月 号 ) の 付け 方 

32K 以 上 に し て お いて , ペー ジ 数 を 1 に 
し て くだ さい . PIO SEL ?ATAHTY 


ンク し て いる も の は , PIO S&L を ロー ド 
ラッ キー モー ド で は パワ ー エ サ が 3 つも ある 


ソー ズ 


(&[FS| を 押し て か ら (絶対 に 忘れ な いよ う 

с) マシ ン 語 モニ タ を ロー ド し て だ る きい 
リン ク し て いな いも の は , マシ ン 語 モニ 

タタ を ロー ド し た 後 , モニ タ で PiO S&L € 

v= FLT AIL, 

iE: マシ ン 語 モニ タ は 9500H 一 A7FFH + EB 


00H—EDACHZ Ct, BASIC エ リア に 重 
な っ て し まう も の は 使え ませ ん . 

次 に テー が か が ら マ シン 語 の 部 分 を ロー ド 
ド し ます 、 

それ か ら BASIC の 100 行 , 6000 一 6999 行 , 
9000 行 以上 は 必要 な く な る の で 消し て 〈 く だ 
きい (消し て お か な いと 竣 走 し て し まう か 


も し れ ま せん ). 
最後 に 、 EXEC&HEBOO を 実行 し . 
トッ プ ・ ア ドレ ス 95OO RETURN 
エン ド ・ ア ドレ ス AZFF RETURN, 
スタ ー ト ・ ア ドレ ス | RETURN | 


と し て CSAVE す れ ば 終わ り で す . 


フー チャ デー デ ト 。 アド 
ャ ラク タダ ・ デ ー タ ・ マ ッ プ , 
ア 表 を 見 て くだ る い . 

BASIC は , 少な いで す が REM 文 も 入れ 
THAL, 変数 も あま り 使 っ て いな い の で て 
説明 は 必要 な いで し ょ う . 

DEMO を する と き は 2 ペー ジ あ れ ば で き 
た の で すか が, アド レス 計算 が 面倒 どっ だ た の 


жуун бы MER പ 
U EUIS 


7904 [ 
SEIS | 

BLI do 
ж RUN 上 直後 の LEVEL …20 行 (&H95A1) 
ж TIME 数 …2100 行 


ж power を 取っ だ た と き , 
タン が 止ま っ て いる 時 剛 


A b O TX 
*&HA2A9 


RUN す る と , デモ が 始ま り ま す . この と 
s, どの LEVEL に する か に よっ て 。1 一 5 
の 数 字 を 押し て くだ さる さい : 

1 27078, 2, 3, 4, 5 と いく に つれ 速度 
が 遅く な が り ま す . また |RETURN| キー, [S 


РАСЕ) 5 —, ジョ イス ティ ッ ク の トリ ガー ボ 


タン を 押す と , 前 回 と 同じ LEVEL で ゲー ム 
が 始ま り ま す . മാം, 最初 は LEVEL3 に モ 
ッ ト し て いま す . 


この ゲー ム は , РіО 君 を 動か し て , アカ 
ж TR А БХТ UNECE 
決め られ た 数 の 卵 を 集め る と いう も の で す . 
次 の よう な キャ ラク タ が 出 て きま す . 
Ров 

I 国 の 国王 の 息子 の 1 f. O 国 の 無 差 別 
卵 破壊 作戦 に 怒り を 覚え て (本 当 は 次 の 国 
ELH ID, 名 を 売 み う ょ 思っ て ?) か 
どう か わか ら な い が 。 と に か く 卵 を 救う 
と する 。. 
アカ タ シ ジ シ ・ ア オタ ン 

O 国 が 派遣 し た 卵 破 壊 特殊 部 隊 の 生き 残 
b, そう と う 強 い ,。 と いう より 無敵 (25 
TRUE, ゲー ム が いつ まで だ っ て も 終わ 
ら な く な る )、 

フル ー ツ 
ум, バナナ , ブドウ, メス ロン, サク 
TYR, AFT, ミカン, スイ カ が ある が 『, 
どう 見 て も 付 て いな いも の も な か に は あり 
ます (全部 だ っ ただ り し て …). 

これ を 取る と ボー ナス が 入り ます . フル 
ー ツ を 取っ だ とき に 入 る 点 は 順に , 40,80, 
120, 100, 140, 180, 220, 200, 240、…… 
どこ いう よ うに な っ て いま す / TY lds 10 
個 フ ルー ツ を 取っ だ た だ とき は , 40+80+120+ 
100 十 140 十 180 十 220=880 で 880 点 と いう こ 
が に が な が ひま ず 【 
障害 物 

赤い 四角 が 障害 物 で す . ぶつ か れ ば も ち 
ろ ん 死 ん で し まい ます 。. 
ワー プ ・ ス クエ ア 
赤い 四角 形 の わく が, 
Ho lnOTTGXt,^^b)2 
എം Чу, Ае: “өлі SST, 
便利 な の で す が , と きど き は 逆 に 邪魔 に 
な る こと も あり ます . 

250, この ゲー ム の 特徴 ほ 上 し て は , ІҢ 
面 の 一 番 端 まで 行く と 反対 の 方 か ら 出 て 〈《 ° 
る こと が 挙げ られ ます . ト く と わか 


ワー ププ *・ ス クエ ア 
ママ 方 の ソー 


言葉 で 書 


ゆ ゅ ごめんなさい./ 迎 夢 快 人 さん , あな た を うた が っ て し まっ て … 
は ナン パ だ デ だ っ た の か な あ ). 
る ん だ っ た の か な お あ 」 
だ た ん で すね . 本 当 に ご めん な る さる いり! 


と 思っ た の で した. 


それ が 。20 才 いっ て る か いっ て な いか の 人 で , 11) 


ച്‌ി HANDS と に な り ま す が , 男 の 方 か ら 声 を か けら れ だ ん で す (あれ 
号 の 迎 夢 快 人 きん の 容貌 に 公 て た の で , 後 で 「 あ れ は 迎 夢 快 人 
Аға; ЖО; デパ ー ト の コン ピュ ー タ 完 場 か 5 出 て きた ん だ も ん いで も あな た は 速く の 人 だ っ 


Құлға し て も らい た い ルン ナ ) p 
i 2% AE. «ён 


| PIO 


り に くい で す が 。 一 度 や っ て みる と よく わ を 取る 7). も 使え を ます 、 それ か ら も う 一 つ , マシ ン 語 
か る と 思い ます (これ で アカ タン , TAR それ か ら 書 き 忘 れ ま し た が , ジョ イス テ 処理 中 も [STOP] キー と |ESC| キー が 効き ま 
ン を お ちょ くり な が ら ,。 ER м0 ィ ッ ク を 使う と き は , 端子 1、2 の どちら で т ий 
Унаа ED көө Ө ө USA өгө өөө Өөн 
| | 1൫൫൭൭. i i 16999.91 
1൫൫൭൫ 1.0.00: 
メ 3) ൫൫൫൪ ғ соо 


レー ツジ ДШ 


この ゲー ム は , な か な か バグ が 取れ な く 
TRH UE TT гы, SO ES B22 
は 全部 取れ た と 見 えて , 一 つも 発見 る れ て 
Gy F; 

それ と , 次 の 作品 は 星 が 横 ス クロ ー ル す 
る シュ ー テ ィング ・ ゲ ー ム で も 作っ て みよ 
うか だ 思っ で いま ず 、 し が も 。 T ASA 


ン 
по 


а 
PiO 動 か す (座標 ) は 出来 上 が っ て いる の で すか が か が, 時 間 の ほ 
> が 全然 取れ な く て , 最悪 の 場合 。 こ Ш 
T 取れ な く て , THEO Hi QU» 
2 最後 の 作品 に な る か も し れ ま せん . 
2) WD 


2. р 


2 (フル ー ツ SUB) 4 (ワー プ SUB) 


CE x 
ワー プ 2 に 座標 替え る ワー プ 1 に 座標 替え る | |Д 


Жр 2-2 


の 

ee 
アオ タン 動か す (フラ グ 見 て 動か せる な ら ) | 

(フラ グ 見 て 動か せる な ら ) 


タイ ム 減 ら す 
PU 


уе$ 
タイ ム 表 示 ・ 処 理 

Ж 

yes 


アト リピ ュー ト 等 処理 
スコ ア 等 文字 書く 


スコ ア 数 等 数 字 書 く 


ЖЕЛІК 


ワ — 2 > B 


° 
BÈ 


| ワー ク ・ エ リア 処理 


по 
ж.ж 
時 間 き た ら フ ルー 
тое 
アカ タン 
$? 
no 
— нең 
取っ た ? 


R= 
E] 
Bt 


ワー プ ・ ス クエ ア 描 〈 


[あな で | 


7153»: 7D? 700 - 2121 


アオ タン ・ ア カタ ン 描 


パパ ワー ドット 描く 


RET 


TURN 
ഭേ 
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) | 画面 スク ロー ル 
キー 入力 ; 
時 間 消費 ルー チン 
重ね る 絵 を 描く 
8х8 РОТ (ゲー ム 用 ) 
4X7 PUT (KIER) 
8х8 PUT (文字 用 ) 
38 | デモ の と き , 重ね る 絵 の CHR 番号 を 95 
| ABH-95AFH に 入れ る 
アト リピ ビュ ー ト を 元 に 戻す 
| デモ , その 他 CALL 
キャ ラク タ ・ デ ー タ 
3 文字 プリ ント 
| アトリ ビュ ー ト ・ エ リア 操作 , デー タ 
| Breg 色 , Creg 反 転 色 , Dreg у Ereg x, 
8 X 8 文字 用 PUT ルー チン を セッ ト す 
る 


18 | 5 文字 プリ ント 
8 | 5 文字 プリ ント を CALL 
| 5 文字 デー タ 
座標 セッ ト 
PiO を PUT 
| | アカ タン を PUT 
|| アオ タン を PUT 
フル ー ツ kPUT 
ス コア を 表示 
ハイ ・ ス コア 表示 
2 桁 表示 
レベ ル 数 を 表示 
面 数 を 表示 
ゲー ム 面 の 画面 を 作る 
タイ ム を 表示 
| 仮想 を クリ ア 
| フル ー ツ PUT 
アト リピ ュー ト を 元 に 戻す 
キー 入力 (ゲー ム 用 ) 
PiO 捕 まっ た か 判断 
PiO 動 か す (座標 ) 
PiO の 座標 修正 
x 座標 合わ せ る 
y 座 標 合 わせ る 
| アカ タン 動か す 
アオ タン 動か す 
タイ ム 数 減ら す 
| ワー ク ・ エ リア 処理 (XOR, DEC) 
0 | 時 間 き た ら フ ルー ツ PUT 
| フル ー ツ ・ ワ ー ク INC 
PiO 座 標 ルー プ 1 に 
PiO 座 標 ルー プ 2 に 
フル ー ツ 音楽 
| タマ ゴ 音 楽 
ワー プ 音 楽 


10 CLEAR20,&H9500: CONSOLE, 332 

20 POKE&HFFC2,&HF3:POKE&HFFCS , ҰН 
FB: POKE&H9SA1 ¢3 Í 

100 IF PEEK (%Н9500) < >%Н21 THEN б 
OSUB 6010: GOSUB 9010 

1000 REM *** DEMO жжж 

1010 EXEC&H9F18:GOSUB 5010:EXEC% 
H96C8: EXEC&H9SQ00: SCREEN ,,2: EXEC 
&H9S0A4 

1020 EXEC£&H1058: EXEC&H9^5D8 

1050 IF PFEEK(&H96F9)-Q0 THEN 2010 
1040 GOSUB 4010:POKE&H965F9,0:GOT 
O 1020 

2000 REM жжж MAIN +++ 

2010 EXEC£&H9ABB8: POKE&H9CDB , 3: SN= 
の 

2020 SN=SN+ 1 : FUEE&H9CDD 。 SN: POKES: 
Н9СС9,5М%4:ІҒ SN=16 THEN 2010 
2050 PURE&H ワ CD6 , മ: POKE&H9CDA,0:E 
XEC&HA150: POKE&H9CCE , Ø 

2040 A-PEEK(&H9CCC): SCREEN 5,2,2 
: COLOR 1,1,1:EXEC&HA768: EXEC&HAA 


Х=1:Ү=2 | 
Z ま ="NORMAL MODE 1" 
IF А=2 THEN Z$-"NORMAL MODE 
IF A=3 THEN Z$-" HARDEST MO 


THEN Z$-" LUCKY MOD 


アド レス ・ マ ッ プ 続き 


面 数 を 見 て ゲー ム ・ モ ー ド と 障害 物 の 数 
を ワー ク に 書く 
| | 卵 の 数 を DEC 
| 面 数 を 見 て , アオ タン , アカ タン 動か す 
か を 決め る 
卵 を RND な 位置 に PUT 
フル ー ツ SUB 
タマ ゴ SUB 
ワー プ SUB 
E] パワー ドッ ト SUB 
| PiO 死 フラ グ 立 て る 
アカ タン 動か し PUT 
アオ タン 動か し PUT 
メイ ン 
PiO の 数 PUT 
初期 設定 
0 | 乱数 を 発生 
8 | 仮想 V-RAM の 値 読む 
画面 , 仮想 と XOR 取 る 
な に も な いと ころ を 探す 
な に も な いと ころ へ PUT 
第 1 位 か ら 6 位 まで の スコ ア PUT 
スコ ア を 並べ 換え る 


| 卵 の 残り 数 
ゲー ム ・ モ ー ド 
| 障害 物 の 数 
パワ ー ド ッ ト を 取っ た と き に 使う 
フル ー ツ を 取っ た と き に 足す 数 
PiO の 数 
0 と 1 を 繰り 返す 
面 数 (16 進 数 ) 
22 | PiO の 座標 
| PiO の キャ ラク タ 番 号 
| ワー プ ・ ス クエ ア の 座標 (1) 
El ワー プ ・ ス クエ ア の 座標 (П) 
ЕВ アカ タン の 座標 
アカ タン の キャ ラク タ 番 号 
アオ タン の 座標 
アオ タン の キャ ラク タ 番 号 
ハイ ・ ス コア 
2ND A37 
3 RD スコ ア 
4TH スコ ア 
ЭЛИ A37 
6 TH スコ ア 
DI 7 TH スコ ア 
| SCORE 


2085 CA=INT (RND (1) #3) +2:CB=INT (К 
ND (1) #3) +2 
2084 IF CA=CB THEN 2085 
2087 GOSUB 2400 
2090 FOR 1=&HE の の の TO &HEI1FF:POKE 
I ,&HBB: NEXT | 

2100 EXEC&H9EAB:POKE&HO9CD1 , 5: РОК 
E&H9CD2,0 
2101 EXEC&HA40Q 
2102 IF PEEK(&H9CCC)-4 THEN EXEC 
&H9AD8 
2110 GOSUB 7100:PLAY "t25506164" 
: EXEC&H9AAQ0 
2120 ЕХЕС%НАЗ@@ 
2150 IF PEEK(&H9CC9)-0 THEN 2200 
2140 A-&H9CDB:B-PEEK (A) : B-B-1: PO 
KE A,B:IF B=@ THEN GOTO 2001 
2150 POKE&H9CC9,SN-«4 

GOSUB 7210 

EXEC&H9A^A0 

GOTO 2930 

CA=3: CB=2: X=2: Y=6: Z$=" CLEAR 


GOSUB 2400 
GOSUB 7410 
GOSUB 2400 
IF PEEK(&HFD1B)470 THEN 222 


GOTO 2020 


表 3 キャ ラク タ ・ デ ー タ ・ マ ッ プ 


ШІ | アカ タン (1) 

0 | アカ タン (H) 
| アオ タン (I) 
アオ タン (П) 
BB 
パワ ー ド ッ ト | 
AA (青色 ) X16 バ イト 
障害 物 

B | ワープ ・ ス クエ ア 


OHZ“4<FZIMDOOOOO NO a ъьсокю— о 


リス ト 1 て いく マン BASIC! スト mmm 


2400 POKERHFDAC , 32 

2410 COLOR CA:LOCATE X,Y:PRINT Z 
Ф 

2420 COLOR CB:LOCATE X*16,Y:PRIN 
T Z$ 

2430 POKESHF DAC , 16: RETURN 

2000 REM xxx GAME OVER +++ 

5001 X-1:Y-26:CA-24:CB-22:2$-"GAME 
OVER" | 

3002 GOSUB2400:M$-"0611t77":PLAY 
M$,M$,M$:PLAY "с", "е", "о": ЕХЕСҒ 
H9AAD 

5010 EXEC&HA7A:EXEC&HA48 

5020 EXEC&H9n9 の 

5050 GOSUB 7010 

2040 EXEC&H9AAQ:EXEC&HA7AQ 

5050 GOTO 1020 

4000 REM жжж DEMO жж 

4010 SCREEN 23,2,2:COLOR 1,1,1:CL, 
S:COLOR 2 

4020 PRINT:PRINT SPC (3) $ "GAME അ 
#4" s PRINT: PRINT 

4050 PRINT " PIO7» 9 ソウ サジ リュ ェ PRIN 
+ 

4040 FRINT 523" 3 79/%"іРБІМТ 
4050 PRINT 29%%4.":РКІМТ 

4 の 6 の PRINT アオ ワー・ ア カタ ン 2А": РКІМ 
4072 PRINT り カ マラ ナイ ヨウ ニー! " 

4080 А=%НЕ1@1:РОКЕ A,&H8E:POKE А 


p 拝啓 . PiO 編 集 部 の 皆様 …. 私 , KB b. PiO 創 前 以来 、PiOPiIO に 8 回 (4 月 に 2 回 。 5 月 に 1 回 , 7 一 11 月 に 1 回 づつ ) も 載せ て いた 
だ き , 誠に うれ し くく 思っ て いる 次 第 で ご ざい ます . 今後 大. よろしく お 願い 致し ます . 
私 め の 名 前 を 出し て くれ て 有難 う ね ./ ハ ガキ の バッ ク に も 載せ て くれ て …. “WC・PANIC" は 編集 部 に 遊び に いっ て や っ て みて … と の こと で 
y Tru 受験 生 な の で … ネ . Р5.2 迎 夢 快 人 氏 の 名 を 雲 夢 快 人 と 鞭 く 人 が 多い 有り 編集 部 の 人 まで りや っ ぱ 名 前 な ん だ か らし っ か り 書き Ld 


Р.5.1 迎 夢 快 人 る ん へ …. 貴重 な 1 買 の 紙面 の 中 で 


*29,&HBE:FOR Ізі TO 999:NEXT 
4090 RETURN 

5000 REM жжж SCREEN жжж 

5010 EXEC&HFFC2: SCREEN 5,5,2:С1.5 
5020 A-&H956CA:POKE A, HCO: EXEC&H 
96C8:POKE А,%НЕО 

-5025 LINE (0,0) 一 (の 。 191 ) ,3:LINE(25 
3,0) て (ടട, 191 ) 。 る 

5050 COLOR 4:LINE (1,4) 一 (4 の 。 1 の ) 。 。 
BF:LINE(16,10) - (24,50) 。 , BF 

9040 ІМЕ (52,4) ~ (95,50) , ,BF:LINE 
(60,11) – (86,20) , 1 。BF 

5050 LINE (60,28) ~ (8,50) 。 1 。BF 
3060 1 (107,4) ~ (115,50), , BF 
5070 LINE (115,235) - (156,4) :LINE- ( 
145,4) :LINE- (115,50) 

5080 LINE (122,24) ~ (155,50) :LINE- 
(147,50) :LINE- (125,21) 

5090 PAINT(138,6),,4: РАІМТ (134,4 
4),,4 

5100 LINE(155,4)—-(192,50) , ,BF:LI 
NEC165,112-(192,22) , 1, BF 

2110 LINE(1655,28)—-(192,42) , 1,BF 
5120 COLOR 2 

3130 LINE (100,55) ~ (150,95), ,BF:L 
ITNE (108,65) ~ (121,95) 。 1, BF 

5140 LINE (152,65) ~ (142,95) 。 1,BF 
5150 LINE (160,55) ~ (200,95), ,BF:L 
INE (170,61) (190,67) „1,ВЕ 

5160 (.1МЕ(170,74)-(190,95),1,ВҒ 
5170 LINE(210,55)-(250,95) , , 30: 
INE (220,65) -(240,95) , 1, BF 

5175 LOCATE 1,7:COLOR 3:PRINT "" 
‘LOCATE 135,3:PRINT "" 

5180 LOCATE 0,9:COLOR 4:PRINT "Р 
rogramed by H.W" 

5190 LOCATE 0,14: COLOR 2:PRINT " 
Hit KEY to START"; 

5200 LOCATE 0,10: POKE&HFD92,3:PO0 
KE&HFDAC , 32 

3210 PRINT "music & chr quote fr 
om pio parts" 

5220 POKE&HFD92,2:POKE&HFDAC ,16 
5250 EXEC&HFFC8 

S300 RETURN 

6000 REM xxx SCREEN жжж 

6010 SCREEN 1,1,1:COLOR 1,1,1:CL 
S 


9500:21 
9508:94 
951@:@1 
9518: BQ 
9520: BO 
9528: EQ 
9530: ED 
9538: മമ 
9540: ED 
9548: D8 
'9550: 00 
9558: CD 
9540: CD 
9568: C9 
9570: 28 
9578: 7F 


9580: FE 
9588: DA 
95990: 00 
9598:41 
9SA0: SE 
൦5൧൫8; 95 
95В0:21 
൭൭138 11 
95С0:16 
95C8: 3D 
9500: 3E 
935D8: CS 
95Е0:10 
95Е8: 36 
9 SFO: 03 
9SF8:96 


9600: 32 
9608: 32 
96190: 32 
9618:C1 
9620: 21 
9628: 00 


5 ネ ( 芸 夢 狂人 氏 の 影響 が 強い と いえ ば それ まで だ けど うり.。 
ぅ うー ん ! 


6020 і ІМЕ (0,9) – (255,191) ,4,В 
6030 LOCATE 11,0:PRINT "TAKE МАМ 


6040 LOCATE 2,4:PRINT "PIO Э アヤ リウ 
9,993" ൪ 7932 DA 

6050 LOCATE 2,6:PRINT "vn ALIEN 
-KUN ന്‌ 2"*393U0-*T7?2, 

6060 LOCATE 2,8:PRINT "マウラ 、 ト キト ^ + 
アラ ワレ し ル フル ー リ ラトル ト 、" 

6070 LOCATE 2,10:PRINT " ホ "ー ナ マ m 
; Ae E aa 
6080 LOCATE 10,2:PRINT "CGAME セリ 
441" 
50902 LOCATE 1,12:COLOR 2:PRINT " 
LOADING M.L. > 

6100 LOCATE 20,12 

6110 RETURN 

7000 КЕМ xxx MUSIC жж 

7010 A$-"t20018" 

7020 B$-"oó6edcde4.fgfefg4.gdefoó6 
coóbagbo7c4o6gec2" 


7050 C$-2"oSe2e4.f92g4.gfgaaboó6cd: 


oSbe21" 
7040 D$-"oSco4baboSc4.dedcde4.ed 
c*dfgabgci" 

7050 FLAY А%,А4%,А%:РІ АҮ В%,С%,р% 
7060 RETURN 

7100 : 
7110 A$-"t25518":PLAY АФ,АФ, А+" 
iy" 
7130 DATA po5go6do5go6do5 ロ o6dedo5 
f *o6doSf *o6doS5f *o6ded 

7140 DATA oSr8br8brB8boócoSbr8ar8 
ағВара 
7150 DATA o4gf-* 

7160 DATA oSfo6doS5Sfoó6doS5fo6dedo5 
eoócoSeoócoSeoócdc 

7170 DATA r8ar8arB8abar8gr8gr8gag 
7180 рата fe 

7190 DATA oSd*oócoSd-*oócoSdboóco 
Sbdadag2 
7200 DATA r8gr8gr8gagr8f *r8f *r2 


7210 DATA 12d*do3dg 

7220 RESTORE 7150:ҒОК I-1 TO 3:R 
EAD А%,В%,СФ:РІ АУ А%,В%,С%:МЕХТ 
7250 RETURN 

7300 : 
7310 M$-"t2501804aoS5fedco4boScde 


リス ト 2 


9630: 29 
9638: മം 
9240: AE 
9648:C1 
9650: 2 

9658: 00 
9660: 29 
9668: 07 
9670:С5 
967 日 :F の 


9680: 21 
96588: 99 
9690: 29 
92698: 07 
9600: 23 
96658: CS 
96B0:C9 
96B8: 21 
96C0: OF 


96C8: 21 
94D0: 8C 
95D8:CD 
96EQ: の の 
96E8:95 
96F の 』 ビ 2 
96F 日 : C9 


97 の の 』 の 1 
9708:15 
9710:01 
9718:15 
97290: 05 
9728: 05 
9730: 05 
9738: 05 
9740: 05 
9748:01 
9750:05 
9758:01 


BIO 


| リリ スト 1 て いく マン BASIC リ スト 


O4aoS5co4ba2" 


7520 U$-"t2501805r8dc4bag-*aboScr 
804ag*r2" 

7330 S$-"t2501806ag*gf-*-fed*deef- 
g+a2" 

7540 PLAY М%,0%,5% 

7550 RETURN 

7400 : 

7410 A$-"t150180o6" 

7420 FLAY АФ, А%+"14" ,АФ 

7450 M$-"ccoSgoó6de2ccoSgoóde2fed 
cddaagfedc2" 

7440 U$-"co3bago4co3bagdeff-*go4d 
лер 

7450 S$-"ed*ego7coógeced*ego7coó 
gecagfedcoSboócdelió6fló6edc2" 

7460 PLAY M$,U$,S$ 

7470 RETURN 

9000 REM m.1. CLOAD 

9010 EXEC&H1BA4B:RESTORE 9060 
9020 FOR I=%HF878 TO &HF8D1 

9050 READ А%:РОКЕ I,VAL("&H"4A$) 
9040 NEXT:EXEC&HF87C 

9050 RETURN 

9060 DATA 1a,c3,06,1b,cd,9a,25,0 
6 

9070 DATA @S,cd,70,la,fe,af,20,f 
7 

9080 DATA 10,f7,21,32,f8,06,06,c 
d 

9090 DATA 70,1a,77,23,10,f9,cd,0 
6 

9100 DATA 1b,af,32,38,f8,21,764,2 
5 

9110 DATA cd,cf,30,21,36,f8,cd,c 
+ 

9120 DATA 30,cd,9a,25,2a,32,f8,e 
d 

9150 DATA 4b,34,f8,1e6,00,cd,70,1 
a 

9140 DATA 57,85,5ғ,72 

1 

9190 DATA 20,f3,cd,70,1a,bb,ca,a 
E 

9160 DATA 1a,cd,aa,1a,21,85,03,c 


3 


9170 DATA cf,30 


97690: 05 
9768: 01 
9770: 05 
9778:01 


9780: 03 
9788:FF 
9790: 05 
9798: 50 
97450: 2А 
൦൭7൫8; А2 
97B の :F の 
97B8: 00 
97С0:0ОҒ 
൭70൧8: 0 
97р0:02 
97D8:FF 
97bE0:01 
97E8: 55 
97F0: OE 


97F8:EE 


9800: 30 
9808: SF 
9810:F0 
9818: SF 
9820: A 
9828: А2 
9830: 20 
9858: A2 
9840: 00 
9848: 55 
9850: 24 
9858: Аё 
9860: AA 
9868: AA 
9870:FF 
9878:FF 


Sum: 19 


Р5.3 フリ ー ト ー ク の 発展 が 楽し み で す . Р.5.4 明後日 (10/17) が テス トリ 
(NAKKO さ ん と 香取 さん ファ ン の 火星 鹿 ) 


po 


9880: FF 
9888: Cg 


9890: Dé : 


9898: 95 
980: SF 
൦൭൫൧8: さじ 
98B0: の の 
98B8: 0: 
98C0: ЗЕ 
98C8: 3C 
98D0: 3F 


98D8:00 : 


98E0: ØC 
98E8: SF 


9980: SF 
9988: 3C 
9999: 30 
9998: 3C 
99400: 3F 
൭൭൧൫ ; SC 
99В0:50 
99В8:5С 
99С0:20 
99С8:50 
99D の 』 SF 
൭൦൭൦൧൫; の 3 
99Е0:2Ғ 
99Е8:5С 
ワ 99F の: の の 
99F8: മമ 


PADD: SF 
9^08: ЗС 
905190: の の 
9A18: 3F 
9А20:2Е 
9428:11 
90390: 9C 
9438: 7B 
9А40: 11 
9548: 9C 
9А50:81 
൭858: 11 
9n6 の 』 9C 
9868:87 
9070: 20 
9878:01 


9А80: 16 
9А88: 15 
9099: CD 
9458: А7 
SAAD: ЗА 
൭8൭8: ビワ 
9АВ0:22 
SABES: 21 
SACD: ЗЕ 
ACB: 2 

SAD0: C9 
൭൧൧8 ; ЗЕ 
ОАЕ@:ЕВ 
9^E8: CD 
9AFQO:9F 


9В00:2Е 
9В08:01 
9B10: ЗЕ 


iot Bw Na © “Б 


ІЛЛК2 て いく マン マシ ン 語 リス ト 


05:47 
FF 』 47 
5 99:01 
96:DA^ 
OC: EF 
00: CB 
CO: 03 
00:49 
FC: ВЕ 
00: B3 
FC: ВЕ 
00: B3 


൭1318: 21 
9В20:2Е 
9В28:01 
9В50:С9 
9B38: 3E 
9В40:01 
9B48: ЗЕ 
9В50:01 
9В58:С9 
9В60:8С 
9B68: 8C 
9B70: 8C 
൭79: BE 


9B80: AA 
9B88: ൧൧ 
9В90:АА 
9B98: FF 
9BAQ: АА 
9BA8: の の 
9BBO: の の 
9BB8:FF 
9BC0: BE 
9BCB8: 8C 
SEDO: 8C 
9BD8: 8C 
9BEQO: の の 
909: 00 
ОВЕ@:@@ 
9BF8: 00 


9C00: DD 
9С08:71 
9C10:DD 
9C18: CD 
൭02൭: 05 
9028: 80 
9C30: DD 
9C38: 01 
9С40: 9C 
9C48:01 
9С50:9С 
9C98:01 
9C60: 9C 
൭9൧൭൦8: 01 
9C70: 9C 
9С78:01 


9C80: 9C 
9C88: OF 
9C90: ØD 
9C98: 0А 
9CA^9: 15 
9САВ: QE 
9CBO: АА 
9CB8:FF 
9 じ CC の : の の 
9CC8: の の 
9CDO: ØB 
9CD8: BE 
9CEO: の の 
9СЕӨ: 22 
9СҒ0:00 
9CF8: 00 


9000: 32 
9008: 7D 
9D10:96 
9018: 24 
9D20: 9D 
9D28: 2A 
9D30: 9D 
9D38: 24 
9D40: 9D 
9D48: 2A 
9р50:9р 
൦൧58: DD 
9060: 16 
9058: ØF 
9D70:01 
9D78: 34 


9D80: 77 


9D88:DD : 


9D90: ØF 
9D98: 80 
9DAO: 5А 
эрав: CD 


9DBO:14 
9DB8:FD 
൭20൭: FD 


9DC8:FD 、 


9рре: ср 


9DD8:FD : 


൦൧൧൭: FD 
൭൧൧8: ൦൧ 
൭൦൧൧൭: DD 
9DF8: 9D 


9Е00: 67 
9Е08:81 
9Е 10:96 


9Е 18:54 : 


9Е20:С9 
9Е28:01 
9Е50: 95 
9Е 58:01 
9Е40: 9С 
9Е48: CD 
9Е50: 9р 
9ES58 38 
9Е60:01 
9E68:9C 
9E70: 1C 
9Е78:С9 


9E80: ED 
9E88: 03 
9E9Q0: ED 
9Е98:07 
JEA: 00 
9EAB8:21 
9ЕВ0:00 
9EBB8: AD 
9ЕС0:16 
9EC8: 29 
൭൦൧൧൭: CD 
9ED8: CD 
9EEQ: ED 
9EE8: CD 
9ЕҒ0:90 
9EF8: C6 


Sum: 9H 


ОЕ@@:5А 
9FØ8: 3A 
9Ғ10:Ср 
9F18:21 
9F20: 8C 
9F28: 1D 
9F 30:00 
9F38:2 


9F40:47 、 


9Ғ48:00 
ОЕ5@:4Е 
9F 58: 01 
9F60:21 
9F68:28 
9Ғ70:Е9 
9F78:CB 


9F80:04 
൭88: 2A 
9Ғ90:4В 
9F9 昌 』 AD 
ОЕА@: ЗЕ 
9FA8: 2A 
ОЕВ@:24 
9F B8: 20 
9FCO:22 
9FC8: 86 
9FDO: 2A 
9FD8:2 

9FE の = 13 
ЭҒЕВ: BD 
9FFQ:C9 
9FF8:00 


ADOD: 78 
А008:С9 
AD10: 79 
^018:C7 
А020: ЗА 
^028:E1 
А050: ҒЕ 
A038: C9 
A040: ТА 


FM シリ ー ズ の GAME に つい て 一 言 . よく , 面 ク リア し て 次 の 面 に 行っ た と き 、 前 に 押し て だ た キー が 残っ て て , 勝手 に キャ ラク タ が 移動 し て 
し まう こと が あり ます ね 。 これ を な くす た め に 、 面 の 始ま る 前 に 「Push'S'KEY to Start/」 と いう ふう に GAME に 使わ れ て な い キ ー を 押 る 
せる よう に し て お け ば , 前 に 押し て た 移動 キー は 消え ん. か わり に "S" キ ー が は いる の で ,、 キ ラク タ が 止ま っ た まま GAME 開 始 で きる の で は だ な い 

? 


a A 1A 


2 [ы + で 


е 


МИР Ж. じゃ 


AE 


) で し ょ うぅ か. ひま な 人 は 自分 の GAME に 組み こん で くだ さい . 


Á %/7%, 
, ды), 2% 
à opt 


P.S. 1 11 4 p.640MAPPY > 


“ v 


PL + 
ё + › 


GC Mv 4 


” 


വ; 


ЖҰ 


A, mkIE の 元祖 は L3 で は な いで し ょ うか 


いい 
വിവി 


A 


5 
V A 


pio 


UJAR2 て いく マン マシ ン 語 リス ト 


‘A045:E1 9C 2А ED 9C CD 10 АЙ: Ар А2Е0:28 
Ай50:ҒЕ 77 C4 00 AØ 22 ED 9C:84 A2EB8:CD ` 
А058:С9 20 20 20 20 20 20 20:69 600: 3A 
А060: 2а 21 9C 01 01 മമ 7C 9©91:А& 6268: 58 
Ай68:27 67 7D 98 27 6F 22 D1:2C A580: 26 
А070:9С C9 00 OO OO OO 00 DA:3F Sum: 67 2 A588: മമ 
4078:06 Di 9C C9 20 20 20 2 の : BC A590: ВЕ 
P PC ASIE Mi Ke Pii I CUBO RD SDE ュ の の :CD : A598:C3 
Sum: СА АА 2B 41 2E ED 05 3A:A8 а508:А5 i ASAD: 7B 
Q さ 1 の :9F ASAB: 32 
А080: 3A CE 9C FE QQ 28 04 3D: DE A318: 88 ASBO: EA 
A88: 32 СЕ 9C 3A D8 9C 5р 22:B9 A320: FE : 85188: 00 
QA の 9 の : DB 9C ZA DC 9C EE 01 22:47 А528:ЕВ < 5 ASCO: 20 
A098:DC 9C C9 C9 20 20 20 20:84 A330:FE қ 85൧: 2 
AØAO:ZA D8 9C FE 00 CC 10 9F:27 A338: S5 АС zt А500: ØE 
ദമദദ:ഥ 58 А7 C9 00 QQ QQ 20:B5 А340: А2 : 85൧8: OA 2 
AØBØ:2A FE 9C 7D 81 27 AF 7൧:൧൭ A348: CD > C7 3 А5Е@: ZE 
A0B8:88 27 67 22 FE 9C C9 20:BB A350:28 02 6558: 42 
AØCØ:ZA DA 9C ZC 27 32 ра 9C:BEB 8558: CD : ASF0@: EE 
AOC8:C9 20 20 20 20 20 20 20: А9 人 Q さ 6 の : ദമ z aSF8: 20 
А000: 2А El 9C CD A4 ЕВ CD B8:85 A368: ദമ 
AØD8:A4 C9 OO OO OO OO മമ QQ: 6р A370: FE 
А@Е@:@@ മമ OO OO OO の の OO 00:00 4378: 3A | 
ADER: 20 の の QQ OO OO OO മമ 00:00 A600: А5 
А@Е@:@@ の の の の の の の の の の の の 00:00 4 A608: A1 
aüF8:00 മമ മമ OO OO OO OO 00:00 A610:A1 
------------------------------- 780: 2 8618:51 
Sum: АА CD D9 С FE 9B 71 90:56 588: A420: 30 
590: A628: A5 
A100: 2А E4 9C 22 El 9C C9 20:32 8: А650:21 
4108: 2А E6 9C 22 El 9C CY 20:54 മഃ. А658: А5 
А110:21 18 A1 CD ВЗ 1E C9 20:61 388: : 640: 21 
A118:22 43 46 22 മമ 20 20 20:2р ВО: A648: CS 
A120:21 28 Al CD B2 1E C9 20:71 SBB: A650: 32 
A128:22 45 47 22 00 20 20 20:50 0: 4658: 3E 
A130:21 28 А1 CD ВЗ 1Е C9 20:81 8: A660: FS 
А158:22 45 44 45 46 47 22 00:90 0: 6668: 00 
А140:С9 48 А1 CD BZ 1E C9 20:29 5р8: A670: の の 
A148:22 45 45 47 22 00 20 20:52 SEQ: : ^678: 00 
A150:3A DD 9C FE 01 20 02 21:F6 8: 
^158:05 の 1 FE 02 20 02 21 06:50 0: 
A160:01 FE 02 20 02 21 Q1 04:46 . 8: | 
А168:ҒЕ 04 20 04 21 07 02 00:50 А680: FF 
А17@:ЕЕ 05 20 04 21 08 02 00:52 3 A688:FF 
А178:ҒЕ 06 20 04 21 01 04 00:4Е А690:ҒҒ 
PRE Ee RS PEP SAR gt, POTS ROT Q: A698:FF 
Sum: 42 83 CF 74 7D 8B 65 4BzC の 8: AGAD: FF 
Ø: A6A8:FF 
A180:FE 07 20 04 21 07 02 00:54 8: A6B0:FF 
^188:FE 08 20 04 21 ØB 02 00:56 0: A6B8:FF 
8190:ҒЕ 09 20 04 21 01 04 00:51 8: ^һ&С@: の の 
^198:FE ØA 20 04 21 ØA 01 00:58 52: A4 A6C8: മമ 
А1А@:ҒЕ OB 20 04 21 OB മാ 00: SE 38:44 аро: മമ 
A1AB:FE OC 20 04 21 01 04 00:54 @:А4 A6pD8: 00 
^1BO:FE ØD 20 04 21 QA 02 00:50 8:18 AED: の の 
A1B8:FE OE 20 04 21 ØB 03 の の :5F മഃ: 8൦68: 00 
А1С@:ЕЕ ОҒ 20 04 21 01 04 00:57 8: DC A6F0: 00 
A1C8:Có ØA 32 D? 9C 7С 32 СС:ҒІ Q:CD AGFB: の の 
A1DO:9C 7D 22 CD 9C C9 20 2 の :BD : Ca 
^1D8:24 C9 9C SD 22 C9 9C С9:2С 0:80 Sum: F8 
А1Е0: ЗА DD 9C 87 6F 26 A2 7E:EF 8:15 
А1Е8:52 Оз 9C 23 7E 32 D4 9C:E4 ^700:FD 
А1Е@:С9 21 21 20 21 21 21 21:АҒ 2 ! A708: 75 
А1ЕВ:21 20 21 21 21 21 21 20:06 f А710:Ғр 
ee ОАА таны Же ны е оң A718: 9D 
Sum: ED A4 9A F2 С? E4 C1 10:87 A720: 21 
A728: A7 
А200:00 00 55 00 55 00 55 55:54 A730: 00 
А208:00 ടട 00 55 55 55 55 SS5:FE A738: CD 
А210:55 55 55 55 55 00 00 55:ЕЕ : A740:F6 
А218:55 55 55 55 55 55 55 55:48 8748: 9 
А220:2А El 9C CD B8 A4 CD ре: р : A750:11 
А228: 44 C9 A2 ЗА CF 9C 52 CB:B1 29 2 A758:FE 
А250:9С За DO 9C 32 СА 9C 24:04 A760:10 
A238:CA 9C ЗЕ 14 CD QQ 9D 2A:4C A768:ED 
А240:СА 9C SC ЗЕ 14 CD D8 9E:5 ° A770: 60 
A248:C9 3A DA 9C 3C 87 87 C9:8C : А778:Е% 


290:CD 20 А2 01 മമ 00 CD 49:46 
А258:А2 АҒ CD BO AQ CD 58 9D:DO 
A260:CD 10 А1 CD CO AQ C9 20:94 


A268:CD 20 А2 01 07 QQ CD В@:14 A780:E5 
А270:А0 CD 58 9D CD 20 А! ZE:2E 7 А788:Е5 
А278:14 CD ЕВ A4 CD рв аі C9:8C d ed А790:Е5 
------------------------------- 5 2 A798:ED 
Sum: 2E BE 83 ടമ 2B 6D 93 07:21 5 А7А@:2 

А7АВ: А7 
А280:2А E1 9C EB 2А Е4 9C ED:29 3 A7BØ: DD 
A288:52 C2 99 А2 CD 18 9D CD:9E 2 A7B8: A7 · 
А29@:@8 А1 CD 18 9D CD 30 ൧:0൭ 2B: ЗЕ 3 ^7C0: CD 
А298:С9 CD 18 9D CD 00 A1 C3:7C : A7C8: 2 
А2А0:92 A2 20 20 20 20 20 20:F4 38:3 : A7D0: 00 
A2A8:3E 55 32 CE 9C ЗЕ 00 32:7D А540:5Е 0- A7D8: 00 
A2BO:D3 9C 32 D4 9C CD 20 A2:A0 A548: ЗЕ ^7E0: DD 
A2B8:CD 40 Ai C9 20 20 20 20:F7 А550:Ср : A7E8:02 
А2С@:Е5 ZE 55 52 Dé 9C F1 С9:Е6 А558:71 ` A7FØ: DD 
А2СВ:47 ഉം മദ FE മുഴ 78 C9 20:8D А560: 2А 6769: 02 
А200:Ср 28 9D CD 20 ദമ മം 10:25 А568:52 2 


A2D8:34 DC 9C 80 22 EC 9C CD:B9 А570: А5 


` 


今月 の PIO な ゲー ム 
PC-GOOO2U-—Z 


N60-BASIC+ マ シン 語 


АЛ 


ARS 


BELLI” 自家 用 ヘリ が イカ レ ち ま モニ など で リ スト 2 の マシ ジン 語 ブロ グラ キラ フ コ と と カニ を ジャ ンジ で 休 け 3 TIA 
っ た い . いっ た い 家 まで どう や っ て 帰り ゃ ム を 入力 し , BASIC ブ ログ ラム の 後に モー РЖЬШЕ( C GCE SUC. カラ ス は 200 Hi 
いい ん だ . あの ミラ クル ・ ワ ー ル ド を 通ら ТАКЕ. て Жы 7 യ എപപ 9. LSU 
な けり ゃ 帰れ な い ぜ 」 入力 が 終わ っ た ら 一 端 電源 を 切り , ペー て 人 避け る と 100 点 で す . 

と 男 は つぶ や いた . ふと , あたり を 見 回 ジ 数 を 2 CA BASIC プ ブロ グラ ム を ョ ロー 
TE, そこ に 一 輸 車 が …。 ド し ます そし で RUN する を ょ マシ ジ シン 語 プ 4 面 

FELDI) ログ ラム を 読み 込み デモ が 始ま り ま す . 球 庶 は 手前 で 伸び ます が ,。 ギリ ギリ まで 

男 は 銃 を 片手 に 一 輪 車 に と び 乗 っ た. し VD UU QE ジャ ンプ "し な けれ ば 伸び ませ ん . 車 も と き 
か し , ミラ クル ・ ワ ー ル ド に は 行 手 を は ば ഞ്‌ | どき 出現 し ます . 
む 数 々 の 障害 が …. NNO) у, 参考 文献 

この 男 の 運 命 は 君 の 指 に か か っ て いる . 9) (6) (6 f 1) 横田 英 一 :“Z80 の 使い 方 "、 オ ー ム 社 
で は Good Luck// キー は [SPACE| キー と | 人 | キー だ け を 使い 2) 川合 宏之 : “マイ コン 機械 語 入門 ", 電波 
画 プ ログ ラム ・ イ ン フ ォ メ ーション i. [SPACE] キー は 弾 の 発射 , [人 き | キー は 新聞 社 
Bu О 押す と 一 輪 車 が 伸び , 離す と 縮み ます . + 3 面 で は カラ ス の 死骸 に 注意 ノ 

ペー ジ 数 だ 3, 4 面 で は 一 輪 車 の ジャ ン デ に 使い ま 

N60-BASIC (ロー ダー) T. 


= B | ラシン 語 8720—C9BF 


ゲー ム は 4 面 に 分 か れ て お セ り , 414207 
ア す る と 男 は 家 に 帰り ます . そし て また 1 


1112/0 š+. 


ТШ 


ОСОБЕЙ КЪ ШЕ + >°, 
x NAT TTS SU, ハチ は 100 点 で す . 


С [Bl 


以降 が 難し いな ァ . 


3 面 


MOM MMMM MN MMO 
— <> 7 < СС 


<> << 


ДУ 


2% T ls i. А Жабу du 
DQ Рм де 22 | 弾 は 出 な が い の で ひだ すら 施 け て くだ さい. 
ECOSOC SE DEO SOS SSO gm š 

ООО ОООО (OOO) OON 2) 最後 に ボー ナス が 出 ま す . 


£3, リス ト 1 の BASIC リ スト を 入力 し , 3 面 
カセ モット ・ テ ー フ "に セー し ます. 次 に РО 


リス ト 1 ミラ クル ・ ワ ー ル ド BASIC リ スト 』 


— -” 
SCREEN 5,2,21:1CL8 220 DATACD,CF,30,21,36,F8,CD,CF 


EXEC %H9DEQ: END 250 DATAZØ,CD,9A,25,2A,32,F8,ED 
БАТА1А,С5,06,1В,С0,9А,25,06 240 DATA4B 。 さ 4 。F 日 。 1E 。 の の 。CD 。 7 の 。 1൧ 
DQTA の 5 。 CD 。 7 の 。 1 。FE ,AF , 20 ,F7 250 DATA57,83,5F,72,23,0B,78,B1 
DATA10,F7,21,32,F8,06,06,CD 260 DATAZO,F3,CD, 70,14, BB, CA, 06 
БАТА70,14,77,25,10,Ғ9,Ср,06 || 270 БАТА1В,Ср,06,1В,21,85,05,С2 
БАТА1В,АҒ,252,58,Ғ8,21,76,25 280 DATACF , 30 


100 CLEAR 10,%H8700: CONSOLE , , 。 の 
110 CLS:LOCATE 10,7:PRINT "チョ ッ ト 
マリ テ ネ !!"sPRINT СНКФ (11) 

120 PLAY "cde","efg","gab" 

130 FORIS&HF878TO&HF8D1: READA$:P 
OKEI,VAL ("&H"+A%) : NEXT 

140 EXEC &HF87C 


8700: OF 87D8: AA 
8708: 3E 87E0:77 


8710: 3C 2 87bE8: 56 
8718:20 : 87F0:EB 
8720:77 8780: рр 8 709: АА 
8728: 77 8788: DD 
875@:77 .8790: DD Sum: 92 
8738:77 8798: DD 


8740: DD В7А@: 77 8800: DD 
8748: DD 87A8: A7 3 8808:55 
8750: DD 87B0: 77 8810:FE 
8758: DD 87B8: AA 8818: AA 09:57 
8760:77 87C0: DD 8820: 77 95:96 
8768:77 87C8: 59 8828: 55 FF:07 
8770:77 87р0: 9D |. 8850: ҒЕ АА: 4A 


7) ^ PiO11 月 号 を 見 て いる と , 9 月 号 の カセ ッ ト レ ー ベ ル の こと を 書い て ある 手紙 が た くさ ん あり まし た ね . ぼ くも この カセ モット レー ベル を 苦楽 
Ол の 入っ て いる カモ セ モット ケー ス に 使い ひま し ただ. みん な の 絵 が うま い の に は びっ くり し まし た. も ちろ ん どく も 気に入っ て いま す .。 まだ た どん どん 
カモ セ モット レー ベル を 作っ て くだ さい ( に この カセ モ セット レー ベル を 第 が も の すご く ほ し が っ て いた ). 11 月 号 p.148 の TOMOKO き ん , あな た の 絵 も 


P) きれ いで す よ 。 その カモ セ モット レー ベル を 使っ て いま す . - P.S.1 な ん で 近所 の N 君 は PiIO の プレ ゼン ト ・ コ ユー ナー に 送っ て 当たっ だ の に 。 iF 
Ç : / * e 


8838: AA 
8840: DD 
8848:55 
8850: FF 
8858: AA 
8860: 77 
8868: 55 
8870:FF 
8878: AA 


Sum: 9E 


88890: DD 
8888: 55 
8890: FF 
8898: AA 
BBAD: 76 
8848: 55 
8GBBO:FF 
B8B8: AA 
.88C0: DE 
BBCB: 55 
8800: FF 
8808: AA 
'BBE: 76 
B8EB: 55 
8BFQ:FF 
B8F8: AA 


Sum: 9F 


8900: DA 
8908: 55 
8910:FF 
8918: АА 
8920:7А 
8928:55 
8930: FF 
8958: AA 
8940: DA 
8948: 55 
S8950: FF 
8958: AA 
8960: 7A 
8968: 55 
8970:FF 


8978: АА 


8980: ЕА 
8988: 55 
8990: ЕЕ 
8998: АА 
89460: ФА 
89A8: 55 
B9E の :FF 
89B8: AA 
89C0: EA 
89C8: 55 
89DO:FF 
89D8: AA 
BED: 6A 
85Е8: 55 
В9Е@: FF 
89F8: АА 


SAQO: EA 
BA の B : 55 
BA10: FF 
BA18: AA 
8620: 6A 
8428: 55 
ВА50:ҒҒ 
8A38: AA 
86540: ЕА 
86548: 55 
BASQ: FF 
BAS8: AA 
в^&@: БА 
8A68: 55 
ВА70:ҒҒ 
8278: АА 


SABO: АА 
8688: 55 
SATO: FF 
8498: AA 


BAAD: ^a 
SAAB: 55 
SABO: FF 
BABB: АА 
SACO: AA 
BAC8: 55 
8ADØ: FF 
8൧൧8 : AA 
BAE: AA 
8AE8: 55 
SAFO: FF 
BAF 8B: АА 


BE の 0 の: AA 
ввов: 55 
8B10:FF 
81218: AA 
81220: AA 
81228: 55 
8B30:FF 
8B38: AA 
8B40: AA 
8B48: 55 
SB50:FF 
81359 : AA 
BE6 の : АА 
8B68: 55 
8B70:FF 
8B78: Af 


8B80: ^A 
8688: 55 
8890: FF 
8B98: АА 
BBA: АА 
8168: 55 
8BBO: FF 
8189: AA 
BECO: AA 
8BC8: 55 
SEDO: FF 
8128: AA 
BEE の : AA 
ВВЕВ: 55 
SBFO: FF 
BBF8: AA 


SCA0: АА 
80൭8: 55 
8C10:FF 
8൨8: АА 
8020: AA 
8028: 55 
8C30: FF 
8C38: AA 
8C40: АА 
8С48: 55 
8C50: FF 
8058: AA 
80൭൧: АА 
80൦8: 55 
8C70:FF 
8C78: AA 


8с80: AA 
8C88: 55 
8C90:FF 
BC98: АА 
80.൧൧: AA 
SCAB: 55 
801: FF 
8CB8: AA 
BCCO: AA 
8CC8: 55 
8CDO:FF 
8CD8: AA 
8CEQ: АА 
BCEB』 55 
BCFO:FF 


BCF8: AA. 


Sum: AØ 


BD の の : AA 


リス ト 2 ミラ 


врев: 55 
8D10:FF 
8018: AA 
8D20: AA 
8D28: 55 
8D30:FF 
8D38: AA 
8040: АА 
8048: 55 
SDSO: FF 
8258: AA 
8060: AA 
8D68: 55 
8D70:FF 
8D78: АА 


8D80: АА 
8D88: 55 
8D90:FF 
8D98: AA 
8DAQ: AA 
൫8൧68: 55 
8DBO:FF 
8DB8: AA 
8DCO: АА 
8DC8: 55 
8DDØ: FF 
8DD8: AA 
8൧൧൭: AA 
8DE8: 55 
8DFØ:FF 
8DF 8: AA 


BE の の : EA 
BE の 8 : 55 
BE10:FF 
8E18: ^^ 
BE20: 6A 
8E28: 56 
BE30:FF 
BE38: AA 
ВЕ40: DA 
BE48: 59 
BESO: BF 
BES8: AA 
8E60: 76 
8E68: A7 
8E70: БА 
8E78: AA 


8E80: DD 
8E88: DD 
8E90: DD 
8E98: DD 
BEAD: 77 
BEAB8: 77 
SERO: 77 
ВЕВ8: 77 
SECO: DD 
ВЕСВ: DD 
SEDO: DD 
BED8: DD 
BEEQ: 77 
SEES: 77 
SEFO: 77 
8EF8:77 


8൧ ഗഗ: ЗЕ 
8F08:01 
8F10:1E 
8F18: ПА 
8F20: CD 
8F28: CS 
SF 30: 1B 
8F 38: ЗЕ 
8F40: 09 
8F48:1E 
8F50: B4 
8F 58: CD 
8F60: C5 
8F68:44 
ВҒ70: SE 
8F78: ØA 


Pio 


クル ・ ワ ー ル ド マシ ン 語 リス ト 


ҒА: D3 
АА: 14 
ØB: の 9 
Е9: ВЗ 
EDs FC 
AA:F1 


くに は …( で も ね , その カモ ッ ト は ぼく が も ら っ だ ん だ ぞ 一 . 14412288, 1 < ЗЕМ-772А/7, そし て N 君 の 当たっ た カモ ッ ト は FM- 7 HO 
They oM). (プレ ゼン トコ ー ナ ー の カセ ッ ト 「 異 次 元 か ら の 脱出 」 を と いて し まっ た PiO も どき ) 


91 


9i0 


| リリ スト 2 ミラ クル ・ ワ ー ル ド マシ ン 語 リス ト 


8F80: 21 Sum: DF ҒЗ B3 80 44 54 18 CE:83 9478: ED 
8F88: DF 
8F?0:01 9200:01 06 の の 11 Ар DF ED B0:34 


BF98: ВЕ 
BFA0: 80 


9208: 3A 
9210: 32 


АЗ DF CB 7F 28 11 АҒ:ЕЕ 
А4 DF 21 А2 DF 36 28: B5 


9480: EB 


ағав:ср 9218:21 ІҒ F2 CD EC Аё 18 31:DA 9488: ED 
8F BØ: の の 9220:5А А4 DF FE 16 50 27 ҒЕ:26 94990: DF 
86൧8: 00 9228:12 38 23 ЗА ҒВ DF FE 00:7С 9498: 5B 
BFCQ: 5E 9250:28 1C C3 88 92 21 А? DF:C3 9440: 52 
8FC8: CD 9238: 56 5С 25 25 54 2А А0 DF: 95 9448: 94 
SF DØ: ZE 9240:01 81 02 А7 ED 42 22 00:7С 9480: 7C 
8FD8: 3A 9248:DF CD 13 Аё 18 03 CD 9 の 』 DD 94B8: 38 
8FEQ: 02 9250:А6 01 06 00 21 А0 DF C9:16 94C0: SB 
ВҒЕВ: CD 9258:21 80 BC 22 02 DF 21 DC:SD 94C8: 3A 
8FFØ: Ø 9260:DF CD മമ 92 11 DC DF ED:F7 94D0: 21 
BFF8: さら 9268: BO C9 оо QQ QQ OO の の 00:79 94D8: DF 
9270:21 70 ВО 22 02 DF 21 Е2:54 94EQ: DF 
9278:DF CD 00 92 11 E2 DF ED:FD 94E8:C2 
നന നാം ide tque emp ыан ылыа o ഴി 94FQ: DF 
9990: 21 Sum: 6E 42 2C 62 CD 47 81 65:38 94F8:18 
9008: 36 
9010:21 9280: BO C? の の QQ OO OO OO 00:79 
9018: 22 9288:5А A2 DF FE 3C СА 4E 92:9F 
9020:10 3 9290:CD 64 AS C3 55 92 の の 00:60 9520: A3 
9328: 90 9298321 F9 DF 7E SD 20 02 5Е:14 9508:D4 
9330: ZA 9200:06 77 FE 04 50 08 21 の の :D8 9510: 38 
9038: CD 9208:B9 22 02 DF 18 06 21 40: 3B 9518: 7E 
9040: CA 92В0:В9 22 02 DF 01 മം മമ 11:D4 9520:04 
9948:CD ?2E8:A0 DF 21 Dé DF ED BØ ЗА: 2С 9528: DF 
9959: OC 92С0:А5 DF СВ 77 C2 ЕВ 92 CB:CB 9530: DF 
9058: D8 92С8:7Ғ 28 OD CB BF 32 АЗ DF:F2 9538: CE 
9060: C9 92D0:21 FF E4 CD EC Аё 18 03:80 9540: DF 


9068: മമ 92D8:CD 90 Ав 01 06 മമ 21 AQ:CB 9548: の さ 
9 の 7 の : 02 92EQ:DF 11 Dé DF ED BO C? 00:08 9559: മമ 
9@78:@А 92ЕВ:СВ éF 28 13 1E 12 CD ൭8:2൧ 9558:CD 
92Ғ0:А5 21 A3 DF 36 80 23 56:57 9560: C3 
Sum: 91 92Ғ8:00 21 80 DF 35 C3 EE 91:F7 9568: D6 
——— T 9570: 36 
9@в@:@А Sum: 4F БА ØB 97 BF 42 57 D7:DA 9578: DF 
9088: ØA 
9090: ØA 9300:21 Аз DF 36 60 2A А0 DF:E2 


92098: ØA 
90600: മദ 
90^8: ØA 
90в0:02 
90B8: 00 


9508: 22 
9310: DF 


9518: АВ 2 


9320: 2A 
9328: 52 


9580:С4 
9588:26 
9590:01 
9598: AØ 


90C0: CD 9330:04 DF 36 CO CD 80 АЗ Е1:В@ 95A0: DF 
90C8: EE 9338:47 の 1 EQ 01 ED 42 44 40:49 95A8:47 
9 の D の : の の 9540:11 00 Е7 А7 ED 52 50 09:17 95B の : 7E 05:67 
9@рв:в@ 9348:21 ЕВ ЕВ 22 18 DF EB 18:05 95B8: 36 gA: 38 


90Е0: 90 
90Е8: CD 


9350: 02 
93558: A3 


95С0:21 
95С8:18 


94: AA 
DF: 35 


90Е0: の の 9360:9B АЗ CD 9B A3 C3 10 94: BQ 95SDO: ED C8: AC 
90Е8: ZA 9368: 2A4 18 DF 11 40 01 19 22:AE 9508: FE 
9370:18 DF ED 4B 44 DF ED 5В: 9А 95Е0:94 
9578:46 DF 1D А7 60 69 ED 52:Ғ1 95Е8:02 
rm 95F の : 95 
9100: CD Sum: E? C4 AD 67 CC DB ВА 4E: 40 95F8:21 
9108:CA 
9110:28 9580:58 04 62 óB 18 02 60 59:EC 
9118: CE 9388:2D 2D А7 ЕВ 2А 18 DF ED:FA 
9120: CD 590:52 50 20 2А 10 DF 22 14:01 9400: DF 
9128:28 9 る 98sDF 2A 12 DF 22 16 DF 11:22 9208: 12 
91 30: CB 93A0:40 01 19 22 12 DF 2A 10:A7 9610: A0 
9138: CD 9 さ QBsDF 19 22 10 DF CD മമ А2: 78 9618: 22 
9140: 20 95В0:С5 F8 АЗ СА CA 93 ED SSCS 9220: В? 
9148: 08 93B8:18 DF 11 60 01 ЕВ А7 Ер: ЕВ 9528: ØB 
9150:91 95С0:52 CD 92 А4 21 F8 DF 36:83 9430: А0 


9158:06 95С8:00 C9 CD 95 93 C3 C4 93:D6 94358: CE 
9160: 23 9500:5А F8 DF FE 00 CA F7 93:63 9640: CE 
9168: 28 9508:ҒЕ 15 СА 68 95 CD 61 10:16 9648: DF 
9170; こら 9ЗЕ@:СВ 57 20 08 21 ЕВ DF 36:78 9650: 02 
9178: ZE 95Е8:15 C3 68 93 CD 20 93 CD:20 9658:00 

95Ғ0:00 A2 21 ЕВ DF 34 C9 CD:64 9660: 36 

93F8:61 10 СВ 57 СА 60 A4 CD: 2E 9668:C3 


9180: ЗЕ 
9188:С2 
9190: ЗА 
9198:ҒА 
?1A0: DF 
9148:92 
91B0: ЗА 
൭1138: ES 
91C0: DF 
91C8:92 
91р0:21 
91D8: ЗЕ 
91EQ0: CD 
91E8: CD 
91Ғ0:00 
91F8: BO 


9400: の 
9408:CD 
9410: CD 
9418:FF 


9420:02 . 


9428:ҒЕ 
9450: A9 
9458: 26 
9440: DF 
9448: 66 
9450: 52 
9458: 6E 
9460: 00 
9468: SB 
9470: 07 


9670:СВ 
9678: 3E 


9680: ЗЕ 
9688: 00 
9690: 21 
9498: 00 
96А0:6Е 
96А8:1С 
Во: 3A 
96B8: DF 
96C0: 97 
96C8: DF 
96D0: 3A 
96D8: DF 
96Е0:97 


P 編集 部 の 皆さん 初め まし て , 約 1 箇月 前 に パソ コン を 買っ て いま BASIC の 勉強 を し よう と 思っ て いま す . PC-8801mkII の 本 で いい 本 が あっ 

た ら お し えて くだ さき さい. わか りや すい 本 な ら マ シン 語 の 本 で も か まい ませ ん . P.S.1 サラ トマ の ベン トウ の 買い 方 お し えて / P.S.2 面白 

い ゲ ー ム が あっ た ら お し えて くだ さい .  P.S.3 教え て も ら う こと ば っ か り だ けど 初心 者 な の で 許し て くだ さい . (ドラ ゴン 松本 ) 
工学 社 の 本 で 『PC-8801 プ mk 活用 研究 。 ほ と いう 本 が あり ます よ . © 


> 
; 


«ЖҮ 2 2 4 б жа” 4 "M As 51 - t 
; \ “АҚ? ച്ചി p ч , - \ š К 


gu 


ІЛ ЛК2 ミラ クル ・ ワ ー ル ド マシ ン 語 リス ト 


96E8:DF 9958:21 EE 98 18 08 21 20 99:B1 9BC8:CD 
96Ғ0:01 9950:18 05 21 C8 98 7E B7 CD:9E 9BDO: DF 
96F8:21 3 9968:В2 1E 2E 04 26 AØ CD ҒО: 686 9BD8: 18 
9970:АҒ 25 20 ҒА 2D 20 FS С9:Е9 9BE の :E6 
997 日 : CD ES BO C3 5р 99 00 മമ: 9BE8: 97 
ee ЭВЕ@: ZA 
9700:96 2 Sum: AS 51 20 DB 9A 01 26 54:06 9BF8:C8 
9708:01 
9710:C9 9980:CD FB 1D 21 6B EC 22 00:7F 
9718:21 9988:DF 21 58 ജം 22 02 DF 21:52 
9720:23 3 9990:04 DF 36 ØC CD മമ ദമ 21:E さ 9С00: FE 
9728:C3 9998:6F ЕС 22 00 DF 21 88 B6: BE 9CO8:CD 
9730: 01 9940:22 02 DF 21 04 DF 56 0С:49 9С10:СВ 
9728:Ср 9948:Ср OQ А0 C3 58 99 00 00:21 9С18:АВ 
9740:28 : 99BO:CD ES BO CD 60 9E 21 F2:40 9C20:F1 
9748:36 2 99BB8:BF 22 BØ DF 22 B2 DF 21:44 . ൭൧28; 21 
9750: CD ം : 99CO:F9 BF 22 B4 DF 22 Bé DF:24 9C30: 21 
9758: 00 99C8:CD BE 9E 21 96 DF 26 00:C5 9C38:21 
9760:21 *D. 2 3 9900:25 23 36 00 CD 08 AF 21:21 9C40: 21 
9768:04 $3 99р8:02 C2 22 94 DF 21 17 47:39 9C48:21 
9770: EA 99E0: 36 09 21 ВЕ AD 36 09 21:00 9C50: 2A 
9778:DF 99E8:F2 Bé 26 СВ CD 69 9E 21:9B 9C58:52 
99F0:68 Сі 22 1E DF CD рв 94:87 9C560: 01 
Sum: 1E 99ғҒв8:00 മമ മമ മമ മമ OO の の 00:00 9С68:11 
------------------------------- 9C70:52 
9780: DC i Sum: 16 A2 5р 51 91 6р 90 9A:6E 9C78:21 
9788:21 
9790: DF s 32 одоо: оо മമ OO CD ЕВ Bé 3A 96:2В 
9798: RQ 9AQ08:DF 21 96 DF 36 00 FE 01:44 
37450: ЗА 9410:28 20 CD DO 9A 21 1C DF:9B 9C80: A4 
97458: ЗА 9818:56 00 23 36 00 21 ВІ DF:10 9C88:A7 
97B0:97 9420:35 28 09 CD 80 99 CD 40:59 9С90:01 
97B8:FF 9428:B5 C3 EC 99 C3 90 BF C9:48 9C98: DF 
97C0: 16 4 : 9430:00 മമ 21 82 DF 36 ØF CD:94 9CA0:C3 
97C8: 3A 9AZ8:10@ AD 3A 96 DF FE 02 СА: 56 9CA8: DF 
97D0: 3A 9440:12 9A CD മമ ES 3A D3 рғ: іа 9CB の : BB 
97D8:D8 9A48:CB 7F 20 05 CD 30 AC 18:30 9CB8: 28 
97EQ:34 | 9450:05 21 82 DF CB FE の の 00:50 9CCO: 36 
97E8: 3A 9458:00 ЗА 96 DF FE 02 CA 12:8B 9CC8: 22 
97F0:D8 C: 9450: 9А 3A 09 DF CB 7F 20 @5:ЕВ 9CDO: AS 
97F8:CD 3 : 9A468:CD 48 AC 18 05 21 82 DF:60 9CD8: BB 
9470:CB Fé CD 10 AD за 96 DF:FA 9CEQ: А4 
Sums 11 | 9478:FE 02 СА 12 9A ЗА DF рғ: Е 9СЕВ: 22 
-л------------------------------ 9CFO:FE 
9800: DF Sum: 49 C7 F7 OC 1B D3 A2 А0: 45 9CF8:2B 
9808: AD 
9810:21 9ABO:CB 7F 20 05 CD 60 AC 18:60 
9818:9E 9488:05 21 82 DF CB ЕЕ 00 00:40 
9820: 00 DF:23 9490:00 ЗА 96 DF FE 02 CA 12:8B 9D の の : DF 
9828:21 E&: 9D 9A98:9A 3A ES DF СВ 7F 20 06:08 9DQ8: CD 
9830: DF CD: 54 9АА@: СЮ 78 AC C3 37 9A 21 82:28 9D10: 20 
9838:E8 DF : E さ 9AA8:DF СВ Eb 3A 82 DF FE FF:28 9D18:CD 
9840: 36 32:54 9ABO:C2 37 9A 21 96 DF 26 DO: SF 9D20: 20 
9848:96 DF: CO 9AB8:CD рв 9A CD 9C 9E CD А8: BE 9D28:CD 
9850: 36 . DF : 1 の 9ACO:9E C3 ЕВ 9A 00 മമ മമ の の :F ミ 9D30: മമ 
9858: 35 - C9:50 9AC8:21 98 DF 36 00 C3 78 99:422 9D38: BO 
9860: の の CD: C4 9ADO:21 96 DF 36 00 C3 78 99:40 9D40: 02 
9868: 10 CA: 36 94D8:21 80 DF 26 30 21 01 മമ: മദ 9048:7Ғ 
9870:46 9АЕ0:22 1С DF CD 60 А4 CD ҒО: АВ 9DS0: 25 
9878: CE : 9AE8:AF CD FO АҒ CD FQ AF 21:48 ൭൧58: DF 
QAFØ:8 DF 55 20 ЕВ C? QQ 00:65 9D60: 44 
Sum: BE 9A5F8:21 Ай 07 CD BO 98 21 C2:CO 9D68: C6 
tes Fo dab Si ы сала алара Аа ыды Аа Ата Ой 9D70:FE 
9880:05 2 Sum: 18 3F 83 22 41 61 46 SE:52 9D78: DF 
9888: AD : 
9890: 98 9В00:С0 22 94 DF 21 17 А7 56:6А 
` 9898: CD : 9EQ8:0@7 21 80 DF 36 40 Øi 20:26 
9ВА@: DF 5 9В10:00 11 D2 DF 21 ØC B3 ED:8F эрв@:С5` 
൭9൫8൧9: C2 9В18:В0 21 00 CO 22 1E DF CD:7D 9D88: の の 
98BQ: 22 9B20:DO 95 CD 61 10 32 QE DF:CO 9D90: 06 
9818: ES 9B28:CD 50 АЕ CD 90 BS 2А 12:19 9D98: 02 
98С0:49 | 9B30:DF CD 18 Al 3A 96 DF ҒЕ:12 9DA0: 9р 
98C8:22 77 ; 9B38:02 CA 7E 9B CD BØ 96 34:32 9DA^8: AØ C9:C3 
9800: 6F : 5 9В40:80 DF FE の の СА 30 9C CD:CO 9DBO: 21 DØ: DD 
98D8: 31 : ' 9B48:DO 96 SA 80 DF FE മമ CA:C7 ൭൧88: FE DO: 6 の 
98EQ: 34 4 56 2 9850:58 9C CD Ай 97 34 80 DF:71 9DCO: Có Ç 91:F9 
98EBs61 31 : 9B58:FE 00 СА 40 9C CD В4 97:BC 9DC8:01 D8: AE 
98FQ:74 31 32 32 75 2 : 9B6 の : さ Q 80 DF FE മമ СА 48 9C:45 DD の 』 91 DA:FD 
98F8: 35 3 351-3 9B68:CD CB 97 CD ЕЙ 97 ED 4В:АВ 9DD8: 9C 00: 9C 
9В70:94 DF 2А 1E DF АҒ ED 42:78 9DEQ: CD 
9В78:СА 19 9B C3 IF 9B CD 78:40 7DEB: മഥ 
Se tii പതാം 9DFQ: QQ 
9900: 67 1 Sum: EO 40 の 1 D3 FB BE А6 Ғ5:16 9DF8:16 


9908: 34 34:39 


9910:72 : 36:46 9B80:99 21 1C DF 36 മമ 25 56:44 
9918:72- 21:37 9B88:00 21 96 DF 56 മമ 21 81:6E 
9920: さら 31:38 9B9 ウ の :DF 35 28 ØC CD 28 9C CD:A6 9Е00:Ср 
9928: 36 00: DØ 9В98:40 ES CD 08 9A C3 09 9В:9В 9EQ08: DF 
99з@:22 4D: 4B 9BAQ:C3 മെ BF C9 00 00 21 82:4E 9Е10:Е8 
9938: 35 63: 2D 9BAB:DF 26 ОҒ CD DO 93 CD 61:82 9E18:06 
9940: 63 31:51 9BBO:10 52 ØE DF CD 50 AE CD:C7 9E20:81 
9948: 36 a 52:68 9BB8:9@ BS 2A 12 DF CD 18 A1:E6 9Е28: FE 
9950: 62 i 00: FØ 9BCO:3A 96 DF FE 02 CA 7E 9B:92 9E മഃ C9 


ワリ スト 4 


~ 


pi 


9Е58:22 
9E40: АС 
9Е48: B1 
9Е50: АС 
9Е5В:9Ғ 
9Е60:21 
9E68:9E 
9Е70:21 
9E78: DF 


59 
22 
AC 


m 
22 


ас 
81 
ЕВ 
6F 


22 
AC 
22 
AC 
B7 


AC 
99 
ас 
87 
C9 


ラク ル ・ ワ ー ル ド マシ ン 語 リス ト 
69: B1. 


22:84 
57:СЕ 
22:60 


--- “-- ----.--...................................................... ...... 


Sum: óB 


9E80: EA 
9E88:CD 
9E90: AD 
9E98: の の 
JEA: CD 
9EA8: SE 
EEO: 00 
9EB8:10 
9ECO: 00 
9ЕСӨ: 00 
SEDO: 28 
9ED8: 00 
SEED: の の 
9EEB8: の の 
9EFQO: 00 
9EF8: 00 


9Ғ00:21 
൭൧൫8: C2 
9Ғ10:05 
9Е 18:04 
9Е20: 05 
9F 28: 08 
9Е50: 05 
9F 38: OC 
9F 40: 05 
ОЕ48:1@ 
9Е50: 05 
9FS8:14 
9F 60: の 5 
9F 6 日 』 7E 
9F70: 00 
9F78:00 


10: 35 
36:FF 
36:48 
36:44 
56: АВ 
56:5С 
34: АВ 
56:74 
56: АВ 
56:8С 
36:08 


--------.--.-.........................................-.-..-.- Ч 


9Е80: AØ 
,SSF88: Са 
9Е90: FE 
9F98:F0 
9FAa0: 08 
9F^8:21 
9F BØ: 68 
9FB8:21 
9FCO:21 
9FC8:DF 
9FDO:DF 
9FD8:21 
9FE0: 2B 
ФЕЕВ:7Е 
FFU: Ср 
FFE: B4 


س — — — — — سے — سے — — سے سی سے — سے سیت سے ی L ത ന‏ -- --- — ج M‏ 


Sum: 34 


ADOD: 2A 


А008: 15 : 


А010: 55 
^018:2 

A020: 2А 
^028:21 
A030: SE 
^0:8: മമ 
А040: CA 
6048: 2A 
A050: 21 
A058: മം 
A050: ZC 
2068: മദ 
4070: 21 
A078: 06 


س س سس س مس سے سسس بی سس سس مس م س س س I L‏ س 


A080: 5р 
A088: 2А 
А090: 21 
A098: AØ 
А@А@: AØ 


A058: の の 
AOBO: 56 
൧൭൧288: 21 
ACO: の の 
А2С8: 21 
дарв: 21 
А008: 21 
АЕО: 06 
AOE8:10 
AØFØ: 21 
൧൭8: 21 


A120: 2А 
A108: DF 
A110:C3 
А118:16 
А120:77 
^128: 1E 
A1 30: DF 
A138: の 2 
^140: の の 
А148:21 
А150:2А 
5158: 4B 
A160: FE 
A168: DF 
A1 70: ØA 
A178: 4B 


A180: CA 
A188: 43 
A190: 7D 
A198: CO 
61 ദമഃ: 7D 
൧1 ൧8 : 21 
൧11: 21 
А1В8:25 
А1С0:7Е 
A1C8:B7 
A1D0: 36 
6108: C3 
А1Е@:21 
А1ЕВ:@5 
A1FO: 25 
A1F8: C2 


A200: ЗА 


A208: 3D 3 


A210: 9E 
A218: 21 
A220: 32 
A228: 2A 
A230: 22 


А258:67 2 


A240: 21 
A248: 21 
А250:01 
А258:00 
А260:А2 
A268: CA 
А270:ҒЕ 


А280:00 
А288:5Е 
a290:C3 
A298: CD 
А2А@: SE 
6268: 20 
А2В0:10 
^2B8:43 
A2C0: 2B 
A2C8: SE 
A2DO: ØE 
^2D8:14 
A2EØ: C3 
A2EB: 2A 
A2F0:21 


Sum: F9 
A300:62 


AZøØ8: CD 
6310: 62 


A318: 54 
A320: 7B 
А528: BF 

550:5Е 
A558: ЗЕ 

340: 2B 
A.248: CA 
А550: 7C 
A358: 1F 

360: SE 
A368: A7 
А570: АЗ 
A378: ЗЕ 


А580: 2А 
A388: AB 
А590: 70 
А598: C3 


АЗАЙ: DF 2 


6:൧8 : DF 
A3BO:C5 
6:28: АЗ 
ASCO: АВ 
a3c8: 36 
a3Do:Eo 
ASD8: EQ 
ASEQ: 2A 


ASEB:DF ` 


A3SFO:DF 
SFO: 


A400: 05 
A408: さら 
A410: AØ 
A418: ED 
А420: 55 
А428: 16 
A430: 02 
А428: 0A 
4440: CD 
A448: 6E 
A450: A4 
A458: 3E 
5460: C3 
А468: 1D 
A470: А4 
A478: 00 


Sum: D9 


A480: 4B 
A488: 42 
24490: 1A 
A498: DF 
A4A0: ED 
A4A8: ED 
^4B0: 22 
^4B8:43 
A4C0: A4 
A4C8: BO 
^4DO: 01 
A4D8: CD 
^4EQ0:21 
A4E8: 4B 
A4F 0: 0A 
A4F8:C3 


А5@@; CD 
A508: СВ 
A510:D2 
А518:21 
А520: CD 
AS28:C8 
А550: 55 
А558: 21 
А549: CD 
А548: СВ 
ASSO: А5 
А558: 2А 
А550: മമ 
А528: 2A 
А57@:25 
А578:00 


F9:F2 
55:00 
00:88 
00:0Е 
00:15 
ZE: В 
00:52 
E6:96 


P PC-1251 CO, 簡単 な モー ルス 信号 練習 プロ グラ ム を お 教え し ます . PRO モ ー ド で , 10 ""--&IEB1—GOTO 1 0 と し て , RUN 
モー ド で , RUN [ENTER] と し て HIT ANY KEY ([ОЕР|, [SHIFT], [BREAK] 以外 ) する と 、 押 し て いる 間 、 ピー 音 が で ます . 終わ る に は 


[BREAK] C4. PS. PiO に は , 1251 の プロ グラ ム が 毎月 載っ て いて 。 質 も 高い の で うれ し いで す . 


(FICK) 


— 


6588: 56 
AS90: 2А 
А598:А5 
ASAD: 2А 
൧5൧൫ : DF 
АВО: AØ 
ASB8: 2А 
ASCO: DF 
ASC8:23 
ASDO: B8 
ASD8:21 
А5Е0:00 
6558: 24 
ASFA: B8 


Sum: B9 


A600: 2A 
A608: DF 
65610: CD 
А618:А5 
A620: 01 
A628: А5 
A630: CA 
А6358: FE 
A640: 2A 
6648:23 
A650: 2B 
0൭58: FE 
65660: 2А 
A668: 54 
А670:80 
A678: 2A 


A080: A4 
А688: FE 
A490: ЗА 
A498: 3A 
AbAD: FE 
AbAB: 60 
A6B0: 05 
A6B8: CD 
ACO: А5 
ACB: 96 
ара: മമ 
A6D8: 24 
AbED: A4 
A6EB 2൧ 
Q6F の : EO 
Q6F 日 : CB 


А7@@:2А 
^708:42 
А710:21 
А718:В8 
A720: OD 
A728: の の 
A730: 24 
A738: EO 
A740: 3A 
A748: FE 
A750: 90 
A758: 21 
A740: A7 
A768: 2A 
A770:A5 
A778: 2А 


A780: DF 
A788:C3 
4790: 2A 
A798: DF 
A7AD: 23 
A7A8: C3 
A7560: 2А 
^7B8:90 
А7С@:2А 
А7СВ:С5 
А700: 2A 
7൧൫: DF 
A7EQ: 2A 
А7ЕВ:Ер 
Q7F の : മമ 


^7F8:DF . 


CA: さじ 
ҒЕзЕ2 
00:50 
S8: A3 
じ さ 』 92 
CD: 1A 
00:65 


А800: 5A 
A808: 1F 
6810: DF 
൧81 8: 54 
A820: ED 
06828: CD 
6830: SE 
A838: 6C 
A840: CD 
A848: 00 
А850: 6% 
А858: CD 
A860: 00 
A868: 05 
^870: SE 


A880: 25 


A888: A3 
A890: 56 
A898: 23 
АВА@: аз 
АВАВ: 56 
A8BØ: 25 
6828: АЗ 
ASCO: 56 
6808: C3 
ABDO: SE 
А808: АВ 
ABEQ: CD 
АВЕВ: АЗ 
АВЕ@: ^8 
АВЕВ: CD 


Sum: А2 


А500: 00 
n ワ の 8 : AS 
6910: CD 
04918: の の 
6920: ^5 
6928: CD 
49350: 00 
A938: А5 
6940: CD 
6948: の の 
A950: А5 
А958: CD 
A960: 00 
A968: А5 
A970: CD 
A978: 00 


Sum: ZA 


0980: А5 
A988: CD 
A990: മമ 
A998: А5 
AAO: CD 
൧൦8 : E1 
AED: SA 
А9ВВ: FE 
А9С0: 50 
A?C8: 04 
A?DØ: A3 
A9D8: A3 
А9Е0: А2 
AES: 60 
AFO:1A 
AFB: 47 


Sum: ҒА 


AADO: SA 
AAOS: DF 


AA1D:CA . 


AA18: FE 
АА20: 70 
АА28: D8 
аа: CD 
nn 日 s А7 
AAÓ40: А5 
648 : CD 
AASØ: 7E 
АА58: 7E 
АА60:Ср 
ААёВ: 14 
AA70: Ср 
66578: CD 


ЗЕ: 55 
26: FE 
69:79 
ЗЕ: ЗЕ 
LILE 
00: D9 
CA: 06 
40: OE 
36: B8 
CA:FF 
S4: 1F 
36: B8 
20: 5A 
Az: 38 


C3: ED 
2B: ØA 
00: BA 


50:54 


52:48 


22:47 


5 22:СА 


С9%25 


бит: 84 


A680: CD 
аавв: CD 
A690: CD 
65498: CD 
ദമമമ: АЗ 
AAAS: AZ 
AABO: AZ 
ААВВ: A3 
AACO: A3 
AAC8: АЗ 
AADO: A3 
AAD8: CD 
AGED: A3 
AAES: bE 
AAFØ:CD 
AAF8:CD 


Sum: 1E 


ARØØ: CD 
ABOS: CD 
AB10:CD 
AB18:CD 
AB20: CD 
AB28: CD 
AB30: CD 
AB38: CD 
6124: CD 
൧149: CD 
ABSA: Ср 
ABS8: CD 
АВ60:Ср 
AB68: CD 
^B70: ED 
^B78: DD 


AB80: 2A 
AB88: 1D 
AB90: ED 
൧1൦8: 56 
ABAD: CD 
АВАВ: A1 
ABBO: А7 
൧1129: A1 
ABCO: 3D 
ABC8:ED 
ABDO: 02 
൧128: DD 
ABEQ: 2C 
АВЕӨ:15 
ABF0: 54 
൧-8: 00 


ACOQO: DF 
6൭9: DF 
АС10:28 
АС18:05 
AC20: DF 
6028: AØ 
AC30: SE 
АС58:21 
AC40: B2 
АС48: ЗЕ 
АС50: 21 
АС58:Е2 
АС60: ЗЕ 
АС68:21 
൧0 7മ: B2 
АС78: ЗЕ 


൧൧9൭ : 21 
AC88: B2 
АС90: ЗЕ 
АС98: 21 
АСА: B2 
ACAB: ЗЕ 
ACBO: 21 
ACB8: B2 
ACCO: 7E 
АССВ: SE 
ACD0:71 
ACD8: C9 
ACEO: ØA 
ACES: 26 
ACFØ: 2A 


Pio 


JANA TTD TIVE ഴം ആത 


95 


リス ト 2 à 


2? 


pQ 


ACF8: 20 


ADOO:FE 
AD08: 40 
AD10: CD 
AD18: A4 
AD20: 2A 
AD28: A4 
AD30:AD 
А058: 63 
А040: 2A 
AD48: 42 
ADS): 2A 
ADS8:FE 
AD60: 02 
AD68: 28 
А070: Аё 
А078: 2А 


` Sums 114 


AD80: A6 
൧089: 21 
А090: BB 
AD?8: ØD 
ADAD: 2с 
Арав: DF 
Арво: AD 
൧218: 2A 
ADCO: CD 
АрСВ:ЗА 
ADDO: FE 
ADDS: 20 
ADE0: 21 
^DE8: AE 
ADF: 2A 
ADF8: CD 


Sum: 59 


QE の の 』 CD 
АЕ 08: 54 
൧1:20 
AE18:A5 
^AE20: CD 
АЕ28: А5 
АЕЗ@:ЕЕ 
AE さ 』 DD 
AE40: 3A 
AE48: C3 
AESO)0: ЗА 
AES8: 06 
AE60: 99 
AE68:80 
AE 70: DD 
AE 78: 6 の 


AE80: 7E 
AEBS: 4F 
AE90: 02 
АЕ98:03 
AEAQ: 08 
AEA8: 36 
AEBO: 09 
AEB8: 95 
000: ES 
АЕСВ: 52 
АЕре: C9 
AED8: 36 
АЕЕВ: DD 


AEES: DD : 


АЕРО: DD 
AEFS: 7E 


AF00: 08 
AFØ8: DD 
AF10:DD 
AF18:DD 
AF 20: ЗА 
AF 28: AF 
AF 30:12 
AF 38: 04 
AF 40: Ср 
AF 48: 00 
AF SOA: 21 
| AF58: ЗЕ 
AF60: 09 


クル ・ ワ ー ル ド マシ ン 語 リス ト 
2А 00 00 


AF68:95 
AF 70: AE 


AF78:52 3 


AF8: DF 
AF88: の の 
АЕ9@; CD 
^F98: АЕ 
AFAD: 20 
AFA8: DF 
AF BO: CD 
AFB8: АС 
AFCO: 50 
൧൦08: CD 
AF DO: AC 
AF D8: CD 
AFEQ: AC 
AFEB: 20 
AFF0: SE 
AFF8: DD 


водо: по 
B の の : 20 
B の 1 の: の の 
В018:00 
BO20: 00 
BO28: 00 
BQ30: の の 
BO38: 21 
040: 18 
BO48: 01 
BOSD: മമ 
B0S8: の の 
B060: の の 
BO68: 00 
в070:00 
8078; の の 


возо: の の 
BOS88: ЗЕ 
BØ?Ø: DF 
8078: DD 
BOAO: 00 
BOA8: の の 
24010: の の 
240128 : の の 
BOCO: の の 
BOCB8: の の 
воро: の の 
802൧8: 21 
HE の : 00 
1808: 1 1 
BgF の i ED 
BOF8:80 


B100: の の 
B108: の の 
B110: 00 
2118: の の 
B120: 00 
B128: 00 
B130: の の 
В128:21 
B140: 00 
B148: АВ 
B150: 00 
B158: の の 
E1 640: の の 
21 6 日: の の 
В170:00 
B178: 00 


B180: の の 
21 89: 00 
B190: 00 
B178: 00 
81 മഃ മമ 
21 ൧9: 00 
E1 BO: の の 
B1B8: 00 
110: の の 
8108: മമ 
B1D9: മമ 


2108: の の 
H1E の : 00 
B1E8:00 
B1FQ9Q:00 
B1F8:00 


B200: の の 
B208: 08 
B210: 00 
B218: 55 
B220: 35 
E228: 09 
B230: 0A 
B238: 20 
E240: ØA 
B248: 0A 
B250: 00 
B258: の の 


B2B0: 66 
B2B8: 6A 
В2С0:6Е 
B2C8: 1E 
822; 15 
B2D8: 00 
В2Е0:00 
В2ЕӨ:16 
22100: SA 
B2F8: SA 


В500:15 
B398: 05 
В510:00 
8:18: 14 
В520:ҒҒ 
B328: の の 
日 ささ の : の の 
B338: 08 
в540:00 
B348: 35 
B350:35 
В258:09 
B360: ØA 
B368: 20 
B370: മദ 
B378: 0^ 


B380: の の 
B388: 00 
B390: 09 
B398: 56 
B35A0: 06 
2:൧8: の の 
В5В0:00 
B3B8: 00 
ESCO: の の 
B3C8: 02 
B3DO: 1B 
B3D8: の 2 
В5Е0:16 
B3E8: 00 
B3FO: മമ 


в400:00 
B408: 03 
B410: 37 
B418: DF 
B420: DF 
B428: FF 
B430: ҒҒ 
B438: FF 
B440: SF 


80:58 
70:С7 
7F: 09 
70:D2 
CO:F1 
EA: の 6 
oo: ØC 
60:13 


ps 昨日 は と っ て も 感激 し まし た . 昨日 と に う の は 10 月 25 日 の こと で す . この 日 は 私 の 誕生 日 で , 工場 見 学 (あっ ちこ っ ちの 工場 を 見 て くる や 
20) か ら 帰 っ だ 日 で し た . 帰っ て みる と , な ん と 倉沢 淳 美 ちゃ ん の ポス ター が 届い て いた だ の で す . 当たる は ず が な いと 思っ て いた だ た ので, 5n 
し る が 一 層 増 加 し まし た . プレ ゼン ト っ て いう の に , 当 だ っ だ た こと の な い 私 が 。 20 名 と いう 難関 を ぐり 抜け た の で す . 広告 部 の 方 . どう も 

の (TOSHIMAN) 


na " 


9 あり が とう ご ざい まし た . PiO 買 っ て て 本 当 に よかっ た . PiO 最 高 / 


SONIS ЭЛЕ. 


B448: 05 
E450: の の 
B458: 20 
B460: 00 
B468: 05 
B470: SF 
B478: FF 


B480: FF 
B488: DF 
B490: FF 
B498: D7 
B4A0: ЗЕ 
124൧98: 00 
B4B の : の の 
E4B8: 00 
B4C0: 20 
B4CBi 00 
Вард: 3E 
B4D8: 3E 
B4EQ: 21 
B4E8: 00 
B4FQ: DD 
B4F8:CO 


В500:2А 
E508: 2А 
BS10:DS 
B518:ED 
B520: B4 
B528: Bé 
പാമ; DF 
B538: DF 
B540: CD 
ES48: DF 
8550 ; 21 
B598:71 
8500: 21 


B568: 02 2 


B570:36 


B578:23 


B599: 01 
B598:D4 
BSA0: 50 
ESAS: 52 
BSBO: 42 
15198: DA 
200: 50 
BSC8: 52 
BSDO: 42 
BSD8: EQ 
BSEQ: 30 
EBSE8: 52 
50; 42 
BSF8:E6 


മമ: 30 
B608: 52 
B610: 42 
B618:EC 
220: 30 
B628: 52 
B630: 42 
B638:F2 
B640: 2A 
B648: 01 
B650: AF 
B658:01 
B660:1F 
B668: SF 
B670: 3F 
B678: 1F 


В680:11 
2589: 11 
В690:1Ғ 
B698:13 
Bó6650:13 
В6АВ:12 
B6BU:FD 


ZA: 58 
22:57 
ED:D3 
ED: BQ 
ЗА: 58 
DØ: B4 
D8: AØ 
50:86 
00:78 
47:42 


25198: CD 
8൧0: CA 
8൧0൧9: ED 
B6DO:C3 
B6D8: 00 
B6E0: 00 
B6E8:CD 
ВФЕЙ:Е? 
EéF8:10 


—— — Е തായോ — — 


B700: ЗА 
B708:9?4 
B710: 20 
B718: EB 


B720:00 ` 


B728: 00 
B730: の の 
B738: 00 
E740: の の 
B748: 00 
B750: 00 
B758: の の 
B760: 00 
B768:00 
E770: の の 
B778: 00 


B780: 00 
E788: の の 
в790:00 
B798: 00 
B7^0: の の 
87൧8: 00 
В7В0:00 
B7B8: 00 
В7СФ:ҒЕ 
B7C8: D9 
B7D0: 20 
B7D8: മ. 
В7Е0:80 
B7E8: ØA 
270 ഥഃ 2А 
B7F8: 2А 


B800: 2а 
B808: 2а 
B810: 2A 
B818: 2A 
E820: 2A 
8829: 2A 
B830: 2А 
E838: 0A 
B840: 20 
8848: ED 
B850: 04 
8858: の 1 
B860: BB 
B868: 48 
B870:CD 
8878: C3 


------------------.---.-...-..-..-..-.....-------------------------- 


B880: CD 
B888: の の 
B890: CD 
B898: DF 
B8A0: E8 
B8^8: 21 
B8B0: CD 
B8B8: DF 
ВВС: ЕВ 
5808: 06 
B8D0: 58 
B8D8:FE 
BSED: 04 
2869: 3A 
B8F Ø: DF 
BBF 8: の の 


ロワ の の : の の 
в908:00 
B910: 00 
В918:15 
B920: ^A 


05:45 


リス ト 2 


B928: 05 
H930: の の 
В958:00 
в940:00 
B948: 00 
B950: 55 
B958:01 
B960: 00 
B968: 00 
B970: 02 
B978: 25 


B980: の の 
B988:15 
B990: 55 
В998:15 
B9AQ: 15 
B9A8: 15 
В9В0:15 
B9B8: 15 
В9С0:15 
B9C8: 15 
B9DO:41 
B9D8:41 
B9EQO0: 01 
B9E8: 05 
B9F0:14 
B9F8:54 


BADD: 55 
BAQE : 20 
вА1@:@1 
BA18: 00 
ВА20:11 
БА28:15 
BASO: 99 
BA38:99 
BA4Ø: 2А 
BA48: 02 
BASO: の の 
BAS8:FC 
BA60:FC 
BA68: FC 
BA70: 50 


BA78: ØC 


BA80: の の 
BABS: 30 
BAŞO: ØC 
BA98: 0:5 
BAAD: ØC 
ВААВ:Ғ4 
ВАВд:Ғ4 
BAB8:F4 
ВАСО: SF 
BACB: OC 
BADO: FO 
BAD8: CØ 
BAEO: の の 
BAES: ØF 
BAF0: の の 
BAF8: の の 


вв00:02 
BBOS8: 25 
ВВ10:2Ғ 
BB18:2F 
BB20: の の 
BB28: の の 
вв5@:@@ 
BB38: 00 
BB40: 00 
2148: 00 
BESO: の の 
BBS8: 00 
BB60: 00 
21258: 00 
BE 7 の 』 00 
BE78: 00 


BB80: の の 
BB88: の の 
BB90: の の 


ミラ クル ・ 


BIO 


ワー ルド マシ ン 語 リス ト 


97 


リス ト 2 à 


х 7 


plo 


ВВ98:05 
BBAØ: 16 
22൧8: 1A 
BEBO: 6A 
BBB8:E9 
BECO: EG 
EBC8: 24 
24124120: ØA 
BEDS: 02 
ВВЕ@:55 
ВВЕВ:АА 
BBFØ: AA 
EBF8: AA 


BCØØ: AA 
BCO8: AA 
BC1 の : AA 
20.19: АА 
BC20: АА 
BC28: AA 
BC30: A9 
BC38: 55 
BC40: 56 
BC48: 5A 
BCS0: 5A 
BCS8:FA 
BC60:FA 
BC68:FE 
BC70: 00 
BC78: 00 


BC80: 00 
BC88: 01 
BC90: 07 
BC98:1F 
BCAQ: 1F 
0൧9: 1F 
BCBO: 1F 
ЕСЕВ: 07 
BCCO: 07 
BCC8: の の 
20.20: の の 
BCD8: の の 
BCE の : の の 
208: の の 
BCF の : 00 
BCF 日 : の の 


Sum: 92 


BDOO: 20 
BDQ8: の の 
121 10: 20 
2018: の の 
BD20: 00 
BD28: 00 
BD30: മമ 
BD38: 00 
BD40: の の 
BD48: 20 
222 : の の 
Вр58:00 
BD60: の の 
BD68: 00 
BD70: の の 
BD78: 1൧ 


BD80: 6A 
BD88: 6A 
BD90: 65 
8൧൭8: 6A 
BDAQ: 6^ 
EDA8: 1൧ 
врво: മമ 
BDE8: മമ 
BDCO: മമ 
BDC8: മമ 
BDD の : മമ 
8൧൧8: മമ 
EDED: 00 
BDE8: の の 
BDFQ: മമ 
BDF8: മമ 


Sum: 27 


`ВЕ@@:@@ 


ワー ルド マシ ン 語 リス ト 


69:93 
69:F4 
A9:6E 
А9: СЕ 
50:11 
00:86 
00:86 
00:86 
00:86 
00:86 
00:86 


BE の 8: 00 
BE10: 00 
BE18: 00 
БЕ20:00 
BE28: 00 
BE 30: 20 
BE 38: 00 
BE40: 00 
BE48: の の 
BESA: 00 
BES8: 00 
BEAD: ØA 
BE68: 2A 
BE70: 2A 
BE78: 2A 


Sum: 88 


BESO: 2А 
BE88: 2A 
BEŞO: 2А 
BE98: 2A 
BEAD: 2A 
BEAB: 2А 
BEBO: 2A 
BEB8: 0A 
BECO: CD 
BEC8: BQ 
BEDO: 24 
BED8: 00 
BEE の : 00 
BEES: DD 
ВЕРО: 02 
BEF8: 66 


Sum: Fé 


BF の の : 05 
RF OB: 04 
BF 10: の の 
BF18:02 
BF20: 01 
BF28: 05 
BF30:01 
BF 38: 04 
EF 40: 21 
BF48:01 
BF50: 04 
20-58: 04 
BF60: 05 
BF68: 05 
BF70: 08 
BF78:07 


BF80: 07 
BF88: 08 
ВҒ90:06 
BF98: の の 
BFAQ: മം 
BFA8: 05 
BEF BA: の の 
BFE8:07 
BFCO:07 
2008: 06 
EF DØ: 08 
BF D8: の の 
BFE の : മദ 
BFE8:07 


C200: 2F 
C008: 25 
С010: 25 
с218: 25 
С020:45 
C028:05 
മമ: 45 
C038: 05 
C040: Ø3 
С048:07 
С050:21 
൭58: 21 
С060:21 
C068: 4A 
C070: 4А 
C078:43 


Sum: 76 


皆さん 初め まし て 鉄人 と 申し ます . ノ こん ぴゅ うた に の め り こ ん で 3 年 . 
ん と か わか る の で す が , 使い 方 が いま いち わか り ま せん . そ うい えば PiO で マシ ン 語 の 講座 を や る と いう 話し が あり まし た だ た ね? ぜひ お ね が いし 
P.S. ちな み に 私 の 愛 機 は PC-6001 で す . 


COBO: 21 
C088: 21 
に の 9 の 』 21 
с258: 07 
СОАО: 41 
САВ: 41 
COBO: 41 
COBB8:2F 
COCO: 4D 
COC8: 2F 
CODD: 71 
серв: 2F 


COED: 25 : 
C@E8:2S 5 


CØFØ:25 


COF8: 25 : 


С100:10 
C108:10 
С110:10 
С118:25 
С120:25 
C128: 25 
C130: 25 
C138: 10 
C140: 1 の 
C148:2F 
C150: 32 


С158:45 5 


C160:42 
C168:24 
C170: 4F 
C178: 4F 


Sum: 8С 


C180: 4F 
C188:1F 
C190: 33 
C198: 55 
C1A0: ささ 
C1A8: 33 
C1B0: 55 
C1B8: 43 
C1C0:43 
109: 43 
C1D0:45 
C1D8: 43 
CiEQ: 4F 
C1E8: 23 
Ci1FQ: 43 
C1F8: 43 


C200: 2F 
C208: の の 
С210: А2 
C218: AA 
C220: 88 
C228: A2 
С250:А2 
C238: 22 
С240:2А 
C248: 08 
C250: 20 
C258: 2А 
C260: 2A 
C268: AA 
C270: АВ 


Sum: 09 


C280: ^0 
C288: の の 
С290:55 
С298:5А 
C2A0: БА 
C268: 65 
C2B0: 6A 
C2B8: 6A 
CACO: 6A 
C2C8: 6A 
C2D0: 6A 
C2D8: БА 
C2bE0: 6A 
0258: 55 
C2F0: 55 
C2F8: 55 


o 
cn cn cn cü cn 


1911൭ 


45:21 
52: CA 


S2:E1 


15:18 
15:18 
15:18 
25:68 
25:98 
25:98 
25:98 
25:98 


いっ し ょ うけ ん め ー マ シン 語 を 勉強 し て お り ま す . 命令 は な 


(I.M) 


оо 


リスト 2 ミラ クル ・ ワ ー ル ド マシ ン 語 リス ト 


Sum: 08 С548: рр D9 9D DD 77 79 B7 77:4E С788: 65 38 2E 72 36 54 63 51:59. 
с550:00 D9 9D DD 77 79 B7 77s 4E С790:56 64 58 65 38 66 38 61:6Е 
C300:55 £ CS58:DD D? 9D DD 77 79 B7 77:4E C798:38 67 38 63 38 62 2D 54:55 
C308: 55 C560:DD DE AD DD 77 78 АВ 77:F6 С7А@: 1 38 66 38 67 2E 22 00:EE 
C310: 69 C568:DD EC 42 DD 77 АҒ 42 77:С7 С7А8:00 15 55 55 01 55 55 55:ВҒ 
C318:69 ` С570: 0р ВЕ 42 DD 77 95 42 77:50 С7В0:05 55 55 55 05 55 55 55:08 
C320: 69% C578:DD 81 56 DD 77 81 F2 77:F2 C7B8:15 ЗА AS 69 15 ФА А5 69:0E 
C328: ൭൭ 5 EA || ------------------------------- С7С0:15 АА АА 69 55 А9 54 59:43 
C330: 6A Sum: 90 05 7C ЕА 9D Её Dé ൧15൨55 C7C8: 56 А5 55 69 56 95 55 69:62 
С558:69 i С7р0: 56 95 55 69 56 95 55 69:52 
C2340: 9 AS Я C580:DD 81 ға рр 77 81 3B 77:DF C7D8: 56 95 55 69 56 95 55 69:52 
C348: 55 CS88:DD Et 2D DD 77 7A B7 77:E7 C7E0:56 95 55 69 56 95 55 69:52 
C350: 55 i С590:21 E1 F5 22 00 DF 21 50:49 С7Е8:56 А5 55 69 15 А9 ФА 6as 4B 
C358:95 С598:С5 22 02 DF 21 04 DF 36:02 С7Ғ@: 15 AA АА 6^ 15 óA n9 68:65 
C340: А5 С5А@:18 C3 മമ ദമ മമ മമ മമ D0: 7E С7Ғ8:05 ЗА А5 6A 05 55 55 55:72 
C368: ടട СЗАВаСр 40 BS 21 2E F1 22 00:24 || -------------------------------- 
C370:55 CSBO:DF 21 00 Có 22 02 DF 21:ЕА Sum: 9D E7 27 @1 7А D4 98 7E:10 
С578: 55 - CSB8:04 DF 56 2F CD മമ ദമ 21:06 
С5С0:352 F1 22 00 DF 21 CO Со: CB СВ00:01 55 55 55 00 15 55 SS: BF 
С5С8:22 02 DF 21 04 DF 36 2Ғ:6С C808:55 55 55 55 55 55 55 55:А8 
CSDO:CD 00 Ай 21 7F C7 7E B7:09 C810:55 55 55 55 55 55 55 55148 
С580:95 CSD8:CD B3 1E CD ҒО АҒ ЗА 19:50 СВ18:55 AA АА 55 55 АА AA 55:ҒС 
C388: AS : CSEO:FD FE 00 20 F9 C3 50 С9:ҒО C820: 55 АА AA 56 55 АА АА 56:ҒЕ 
СЗ9@:А5 “ СЕВ: ЗЕ 18 52 04 DF 22 00 DF:6C C828: 55 АЗ 55 SA 55 А5 55 5А:52 
С598:А6 С5Е@:ЕВ 22 02 DF C3 00 AO 00:51 СВ50:55 A5 55 5A 55 АА АА БА: АС 
С5А0:56 CSF8: оо の の の の മമ の の OO OO 00:00 C838:55 АА АА 69 55 АА АА 69:24 
(5൧9: S6 で C840:55 AS 55 69 55 AS 55 50171 
TED: A9 55:50 Sum: 7C 46 FC 83 19 2C 31 QS5:BC C848:55 AS 55 6A A? АА АА бА: 20 
C3B8:49 95:50 ай СВ50:А9 АА АА óA A? АА АА 69:CD 
CISCO: 65 А9: 62 сово: の の മമ മമ 05 മമ OO മമ ОЕ: 12 СВ58:49 АА АА 69 55 55 55 SS: BA 
С5СВ: 55 55 99:49 С608:00 の の 20 IF の の OO 00 FF: SE СВ60:55 55 55 55 55 55 55 55:АВ 
С5р0:55 55 А9: 495 С610:00 の の 05 FD മമ മമ ОҒ Ғ5:04 C868:55 55 55 55 55 55 55 55:А8 
C3D8: 55 55 С618:00 の の SF DS മമ の の FF 55:68 C870:55 55 55 55 55 55 55 55:АВ 
С5Е0: 55 55 С620:00 05 FD 55 00 ОҒ FS 55: АЕ СВ78:А5 SA АА 55 А5 SA АА 95:3C 
С5ЗЕВ 55 29 С628:00 SF DS 55 00 FF 55 55:12 SR БЫЛ Nm i тн; женеді മ്മാ. о 
С5Ғ0:А9 69 С650:05 Ер 55 55 ОҒ Ғ5 55 55:58 Sum: F4 ЗЕ 4E C1 F3 B3 АЗ ED:77 
C3F8: 95 > C638:3F DS 55 55 SF 55 AA AA:A6 
Сё40: 50 55 АА АА 01 55 AA AA:90 C880:49 SA АА AS А9 SA 55 А9:55 
С648:01 55 АА АА 01 55 AA АА: 54 C888:AA SA 55 69 5А SA 55 69:34 
С650:01 55 АА АА 01 55 AA AA:54 СВ90:5А SA 55 69 SA SA 55 69:E4 
C400: 94 5:3 С658:01 55 АА АА 01 55 55 55:АА С898:56 9А 55 A? 56 9A АА А5: 2р 
C408: 55 : С660:01 55 АА AA 01 55 АА AA:S4 C8A0:S56 ЗА АА 95 AA ЗА АА 55:72 
C410: SE . С668:01 55 АА АА @1 55 АА АА:54 СВАВ:АА SA GA 55 АА 9A 5A 95:56 
С418:01 | қ С670:01 55 АА AA 01 55 АА АА:54 CBBO:AA SA 56 А5 56 9A 56 А5:2 
С420:1Е | : С678:01 55 АА АА 01 55 AA АА:54 СВВВ: 56 9A 55 89 55 55 55 55:42 
C428:FE JE SU IE" [ന്ത പാ женл анын io കെ നാ ത്ത on phus Caco 55 55 55 55 55 55 55:48 
C430: CD 3 Sum: 86 BC OE BB 56 00 52 FC:AC C8C8:55 55 54 00 55 55 55 40:50 
С458:С5 CBDO: ら 5 55 55 50 55 55 55 50:9E 
С440:1В + С680:01 55 АА АА 01 55 55 SS:AA C8D8:S5F DS FD 54 7F F7 FF 54:4Е 
C448: SE 5 C688:01 55 55 55 01 55 55 55:00 CBE の 。 7F F7 FF 54 7Ғ FF FF DSriB 
C450: 0D s. С690:01 55 55 55 01 55 55 55:00 CBEB:FF FF FF D5 FF FF FF р5:А4 
C458: ЗЕ С698:01 55 55 55 01 55 55 55:00 CBF の :FF FF FF DS FF FF ҒҒ р5: А4 
С460:01 : C6A0:01 55 55 55 01 55 55 55:00 CSFSIFF FF'FF. D5.7F FF ҒҒ р5і24 
C468: 1E ത്തത്‌ ശാ; SOT 59:00:: |]. ーー に ビエ アデ アー ア デ て wm エーーーー ニ ーーーーーー エ mm を 
C470:F6 - じ 6B の : 03 FF FF FF 05 FF FF ҒҒ:00 Sum: DD D8 SF 24 2C BD 52 91:04 
C478: CD CoBB8:0:5 FF FF FF の の മമ മമ 00:00 
C6C の :F の 15 54 മമ FC 15 54 @@:ВЕ С900:7Ғ FF FF 55 SF FF FF 55:84 
Sum: 62 2 CeCB:FF 15 54 മമ 7F DS 54 00:10 С908:5Ғ FF FD 55 57 FF FS 54:4Ғ 
C6D の :5F F5 54 മമ 57 Ер 54 00:50 С910:57 ҒҒ Ғ5 54 ടട ЕҒ ഉട 54:1С 
С48@:С5 3 C6D8:55 FF. 54 00 55 7F D4 00:50 С918:55 7F SS 50 55 5р 55 50:00 
C488:1B > . C6E の :55 SF F4 00 55 57 FC 00:50 С920:55 55 55 40 55 55 54 00:50 
C490: 3E : = z C6E8:55 55 FF 00 55 55 7F С@:92 С928:55 55 00 00 15 ടമ 00 00: OF 
C498: ØD СӨҒ0:55 55 SF FQ 55 55 57 FCgiF6 С950:15 40 の の മമ 05 40 の の 00:94 
C440: ZE - COF8:55 55 55 FF bA АА 95 7Ғ:26 C938:05 の の の の OO മട OO മമ 00: 0А 
C448: 01 TE бл || ------------------------------- C940: 05 の の OO OO O4 QQ の の 00:09 
CABO:1E : - Sum: 02 78 48 40 99 QE 24 38:16 С948:04 の の の の OO 04 QQ OO 00: മദ 
САВВ:ЕЕ - С950:21 08 E? 11 АВ C7 CD E8:47 
CACO:CD E! C700:64 АА 95 SF Фа АА 95 50:01 С958:С5 21 OC E9 11 08 СВ CD:89 
C4C8:C5 - С708: а АА 95 50 Фа АА 95 59:F2 С960:ЕВ CS 21 10 E9 11 68 C8:08 
CADO:1B 5 C710:660 AA 95 50 Фа AA 95 50 :ҒғҒ? C968:CD ЕВ C5 21 14 Е9 11 C8:71 
CAD8: ZE С718: 6а АА 95 ടമ 55 55 55 50:48 C970:C8 ЗЕ 22 CD EA CS 26 00:CA 
CAEQ: の D С720:6А АА 95 ടമ 54 AA 95 50:Е2 C978:CD FØ АҒ 25 20 ҒА CD ES:5D 
CAEB: ZE 5 С728: А АА 95 50 óA АА 95 50:Ғ2 ASE esp жүздү жас Dg иы REE ERS 
С4Е0:01 - С750: 5А AA 95 50 Фа АА 95 50:F2 Sum: 87 6А 47 АВ 9C C7 73 77:50 
CAF8:1E C738:68 АА 95 50 6A АА 95 5@:Е2 
"a C740:66 AA 95 50 55 55 55 50:48 С980:В0 C3 рі BE മമ മമ മമ 00:02 
С748:55 55 55 50 57 ടം 57 90:43 C988:3E 07 1E ЕВ CD CS 1B 5Е:46 
C750:5F DA 9F DO SD D9 9D DQ:4B C990:0D 1E 00 CD CS 1B 21 1C:15 
C500: Fé C758:5D D9 9D DØ SF DA SF ре: 46 C998:DF 56 മമ 23 56 മമ 21 96:25 
C508:CD C760:57 56 57 50 44 44 44 40:60 CR の: DF 36 の の 25 25 56 00 С5:54 
C510:C5 - С768:50 14 50 10 50 14 50 10:88 C948:68 CI の の മമ の の の の മമ 00:60 
C518:1E | C770:FF FF FF FØ FF FF FF Ға: ра сово: ро മമ മമ മമ മമ മമ മമ 00:00 
C520: ЗЕ - C778:FF ҒҒ FF FQ മമ മമ മമ 22:0F C9B8:00 の の 00 OO 00 OO QQ FF:FF 
C528: QD "recs a MEE | 5 ルト ーー マテ ベト ーーー ア マーニ ーーー エー エーーー い アー つこ 
C530: DD Sum: 70 6A 73 ОҒ 56 BO ЕЗ 22:47 Sum: 61 19 EF C9 ЕВ 16 SD B2:42 
C538: DD ; 
‘£540: DD С780:74 51 32 52 76 51 55 6F:54 


99 


迷路 に 迷い 込ん で し まっ た DAN #. L 
Db, そこ に は た くさ ん の モン スタ ー が …… 
(タス ケ テ ク レー)). 


較 プ ログ ラム ・ イ ン フ ォ メ ーション 


BASIC 
マシ ン 語 1000--4100 


|、 と て も 凝っ た ゲー ム で , まる て 市 
"| 販 ソ フト の よう で す . (V) 


൭൮.1 (BASIC: ロー タ ダー) を 入力 し , 
テー ブフ" に セー し ます . 

の ② の リスト 2 (マシ ン 語 デー タ : & H1000— 
114100) を 入力 し , SAVEM “DATA”, 
&H1OOO, &H41DO, OL L C > —7'1- 
ടം. മറ്‌, 

⑳ リ スト 3 (K コ ユン パパ イラ: ソース ・ リ ス 
F) を 入力 し て 別 の テー プ に セー し て 
お いて か ら 。 コン パイ ル し ます (аум 
{4 >” HH RAM に 転送 し て か ' ら コン フッ マ パイ 
ル し て くだ さき さい). そ し て 出来 上 が っ だ オ 
プ ブ ジ ェクト を SAVEM “MAIN”, &H4D 
OO, &H7712, &HSOOO と し て テー ジ 
に セー ー プ し ます . 


жол e. D DOs 9 e e se 
< э 4 < rj 


Co OR oy ACRES ed SOR RAS 
HEU TC RUN” “ [RETURN で 始ま り ま 
+ (タイ トル 表示 後 , 残り の プロ グラ ム を 
自動 的 に ロー ド し て くれ ます )。 そ し て デモ 
が あっ て |RETURN| キー を 押す と ゲー ィ 
Ай NTT, 

あな た は , DAN 君 を テン ・ キ ー の [8][2| 
[a][6] キー で 操り 5, イエ ロー ボッ クス か ら カ 
ギ デ を 見 つけ 出し て 次 の 面 へ 進ん で くだ きい . 

を それから, DAN 君 は 時 限 爆弾 を 持っ て い 
T, [SPACE] キー を 押す と DAN 君 の いる 所 
に 爆弾 が 置か れ ま す . TZ UL THREE + о h 
し だ たら すでに 移動 し て くだ さい . 爆発 に 巻 
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“= ` ч 79 a£ "exe 415. 
қ ><. e -- ` 
D bes Же eje eje 

; > ><: >< >< > 


3 ы. > で “ 
e DI 3s, OOs Ks, DQ e ee O 9%. DO 96. DG 3e. 


"Me eye ОК di 


e < ر‎ > 
Sje oo oo eje 
⁄ ÜN" റി NETI N 
) ЖАУУ 


皆さん の 中 で , 電子 工作 の 好き な 人 何人 いる で し ょ うか . 僕 は マイ コン が 一 般 に 
MZ-80K が セミ キッ ト だ っ た 頃 ). ハー ドウ ェ ア の 研究 に も 役立つ と 思い ます . 
文化 祭 に プロ グラ ム に クラ プ etc, 


あき 
ブロッ ク 
2 102 | イエ ロー ボッ クス 
B メイ ン ・ ル ー チ ン | 8 772 
| GAME 画 面 の 表示 — 
d 爆弾 の 爆発 処理 
| 爆弾 の 爆発 表示 
| モンスター ルー チン 
死ん だ と き の 処 理 
GAME OVER 


HN х=!) 


JE S rd 


| 各種 グラ フィ ッ ク ・ サ プ ブルー チン 
「MOVE」 コ マン ド で サブ CPU の & 

HC830 か ら に PUT エ ルー チン 転送 

サウ ンド ・ ル ー チ ン 


き 込 まれ て し まい ます 。 

この 爆弾 の 上 下 左右 な な め 1 マス の 所 に 
イエ ロー ボッ クス が ある と 。, 
ボッ クス は 壊れ ます . と き 


EE 


を の イエ ロー 
どき 箱 の 中 か ら 


フル ー ツ や カギ が 現われ る の で 取っ て 《 く だ て みて くだ さい (1 面 に つき 20 メ 14 バ イト 必 
きい . フル ー ツ は 点数 が 増え を. カギ を 取る ZTT). 

ош EDF (た だ し , カギ は 最 әз үре Ses 
後 の 方 に し か 現われ ませ ん ). 上 置い て (NS 


3€ Je DO DO e СО SS 


А DO DC C 1 
ぐい қ А, 


まだ た だ, モンス ター も 爆弾 で や っ つけ る こ 
bo നു," C pss e LE БЕ 
BINT 2൦൧ 7-2. Я മല 
きま す . この よう に し て , ІНІН bia 58В 
ー も 全部 や っ つけ 


ZOS ンズ 
"Xie DO eje eje 


> 


ЗСЖ) СЕ "We ee 
e 9e 96 ж DO DC зс DON DO f. х ж/ж 
遊び 方 の 項 で 書 き 忘 れ て し まい まし た か が, 
イエ ロー ボッ クス を 破壊 する と , 1 面 に 1 
つっ だ け 点 減 す る ボー ル が 現われ ます . それ 
を 取る と 全部 の モン スタ ー が ある 一 定時 間 
മ്‌ جر‎ 7 が け 止 まる の で , その 間 に や っ つけ て くだ 

2.000 点 ご と に 1 人 増え ます 。 so. 

LEAT, この 作品 は 区 コン パイ ラ で 作 

っ だ プログラム の 第 2 作 目 で す . НИЕ (FI 
ボー ル を 拾え ば , 簡単 に 逆 毅 で きる 


を 全部 な くし ,。 モン スタ 
て も 次 の 面 に 行け ます . 
な お , DAN 君 は モン スタ ー に 捕まる か ,, 
自分 の モッ ト し た 爆弾 に 当たる と 1 人 死に 
iT. DAN 君 が 3 人 死ね と ゲー ム ・ 
95 


KE T EE CEU 
(WD &HC3802: 55 b T2 これ は 1/O 誌 
83 年 11 月 号 の “HAUNTED HOUSE” の 
РОТ ルー チン を 24 メ x 用 に 作り 換え だ も の 
CY. メモ リ ・ マ ッ プ を 図 に 示し ます . 

を それから 。 ソー ス ・ リ スト の 説明 は 表 1 
を 見 れ ば わか る と 思い ます . また だ , 各 面 の 
デー タ を 家 2 に 示す の で , 参考 に し て &H 
2100 一 を 書き 換え て 自分 な り の 迷路 を 作っ 


広まっ て い な い 頃 か ら 興 味 を も っ て いま す (知る 人 ぞ 知 る 
P.S. や り だ いこ と が 多 す ぎ て 時 間 が な い / レ ュー ド に 映画 に 


P.S.2 年 賀 ハ ガキ で すみ ませ ん . ( 四 暗 刻 を ツモ ッ た アイ ラン ド ・ フ ィ ー ル ド ) 


RE MONSTER) より は 良く な っ た と 思い 面 は 30 面 分 あり 、 フル ー ツ も 20 種 類 作 っ て だ きい 。 
ます 。 あり ます . 30 面 クリ ア 目 指し て 頑張 っ て 
RRs) AN BOMB BOMB ロー ダー 


WIDTH 40,25:CONSOLEO,25,0,0 

CLS 

SYMBOL (150,50) , "BOMB BOMB",4,4,5 
LOCATE 15,15:PRINT"LOADING" 
LOADM"DATA" 

LOADM"MAIN" 

EXEC&HSOQOQ: END 


pio 


IJAN2 BOMB BOMB マシ ン 語 リス ト ' 


18Ей OO の の OO മമ ор മമ 7C QQ の の 07 
18FØ の の の の の の の の OO の の മമ の の OO ор 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー デ ーーーー 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 


P Pi011 月 号 PiO ス クエ ア の 気まぐれ イン ベー ダー さん へ / ノ 私 の 知っ て いる 限り で は , ファ ン ロ ー ド の 読者 ど と た いう こと を 最初 に 言っ た 人 
は I/O'81 年 5 月 号 の 外山 雄一 きん だ と 思い ます . その ころ は 「 フ ァ ン ロー ド 」 じ ゃ な く て 「 よ ふぁ ん ろ 一 ど 」 で し た . 決し て 反論 で は あり ませ 
A. ちな み に と いう こと で … P.S. 「ROADIST」(ROADEST ? ) と は ファ ン ロ ー ド の 読者 の こと で す ョ ヨン ノ 

| Tu | ( 妹 に イラ スト で 負け て いる Nakkey ど し た ) 


ti н”; P3 ! 


PIO 


Sum: 


Add 


2500 


2310 ( 


2520 
2550 
2540 
2550 
2560 
2570 
2380 
2590 
2560 


ме — അ — —  — — ഞ്ഞ അര ഇന്ത ത өле» «шер «нее کے‎ «ке өше «ее سے سے مت‎ ജോ سے‎ еке» مدت‎ ആര مس‎ തയ کے بے م سے می سے سے سے سے سے سے‎ മര്‍ کہ صت ست س سج ست‎ ത می کے‎ NÉ 


യയ രയ ഞര യയ ലിയ не оңа» അശ еки» е-е onia. s... өле» и s... s «кез کم‎ a. سے‎ ര سے سے کے کے کے کہ‎ s کے‎ «кес 


リス ト 2 BOMB 


BOMB マシ ン 語 リス 上 


PIO 


リス ト 2 BOMB BOMB マシ ン 語 リス ト 


皆さん ノ /「PiO 愛 読者 の 名 称 」 を 作っ て み ま せ ん か ?“" ア ウシ タン "や "トレ ッ キ ー"、 “ロー の スト "みた だい な や つの こ と で す . 良い ネー ミ < 
グ が で きま し た ら PiOPiO へ / ( け せ ら せ ら ) 


оо 


| リリ スト 2 BOMB BOMB マシ ン 語 リス ト 


оо 


| リス ト 2 BOMB BOMB マシ ン 語 リス ト 


10 "MID[]』CLSE] 
20 “СНз144;бА-%7800; GA1=$7A00; ВХ-%7С00;В 
ҮшВХ%20; BB=BY +20; MX-BB420; MY=MX +20; MX12M 
Y*20; MY 1 =MX 1 +203 СС=МҮ1+20; SS=CC+20; WS=SS 
+20; UP=WS+20 

30 'HS20;M--1 

40 ‘FOR I=@ TO 21;PUTEI,0,821;PUTEI,15,81 
3D1ELI,0,221;D1L1,15,23; NEXT 

50 ‘FOR I=@ TO 15;PUTIO,I,82;PUTI21,1,83 
;3D1£0,1,22;D1L21,1,22; NEXT 

കമ 'LOCL34,1,21; ?"HI-SC";LOCE 34,5,621; ?"S 
CORE"; LOCL37, 19,71; ?"2";LOCE 34, 16, 51;7"5 
СЕМЕ " 

70 'LOCL34,21,71;?"1984";LOCEL 35,22,71; ?" 
7.23"3L0CL 34,23,715 ?"BY H.N";PUTE23,6,13 
3L0OCL38,3,72; ?"0";LOCE 38,7,72; ?"Q"; LOCE 1 
0,0,71;?"L BOMB BOMB 1" 

80 'START1;DEMOL 1; 5С=0; RD= 1 』 FL-1; MA=3 

90 ‘FOR Ісі TO 50;0Р (І) =0; NEXT; UP (0) 21; S 
മാ 

100 “5ТАКТ2;МІ2ЕГ1;ТК-Ф 

110 10С158,10,71;?МАҙ10С157,18,71;?7%2,К 
р 

120 ‘FOR 1=1 TO &$И5(1)=@;55(1)=@;МХ1(1) 
21; MY1 (1) =0; CC (I1) =0; SET2[ 13; NEXT 

150 ‘X=10; Y=14;X1=-1; Y 1= ニ の 』B= ニ の 』F= の 』 BB (1) = 
Ø; BB (2) 20; BB (3) =Ø; C20; CH=3; NO=1 

140 'SOU2L61;WAITLI 1 の の ] 

150 'МА1М;К=бЕТ 

160 ‘IF K=52 THEN CH-23;X1-2-1;Y1-0;ST-1;G 
ОТО АВА; ЕІ 


170 ‘IF К=54 THEN CH=4;X1=1; Y1=0;ST=1; GO 
ТО ААА; ЕІ 

180 ‘IF ടമ THEN CH-1;Yi-1;X1-0;ST-1;GO 
TO ААА; ЕІ 

(190 ‘IF К-56 THEN CH=2』Y1=ー1 』X1= の 』 ST=1;6 
ОТО ААА; ҒІ 

200 ‘IF К-52 THEN ST=1;IF ЮгХ,ҮЈ=@ AND B 


<>5 THEN SQU1L200,0,201; C25; В=В+1; ВВ (В) = 
7: BX (B) =Х; BY (B) ZYs5 D1EX, Y,121;5FI;FI 
210 ‘IF К<>@ AND ST= の THEN X1-20;Y1-0;FI 
220 'IF Х1=@ AND Ү1=@ THEN GOTO BBB;FI 
250 'AAA;Z-DEX*X1,Y-Y123; IF 721 AND 7<9ТН 
EN GOTO BBB;FI 
240 'PUTEX,Y,C2; DD1EX, Y,031; Х=Х+Х1; Y=Y+Y1 
;С=@ 
250 'ВВВ;:РОТЕХ,Ү,СН2; 2=ргх,ҮЈ 
260 ‘IF Z=1 THEN C=5;FI 
270 ‘IF 7-10 THEN SOU2C231;FOR Ізі TO 6:W 
S (1) =5 の 』 NEXT; SOU2ELS3; SCRES3;FI 
280 ‘IF 7-11 THEN SQU2E21; SCRERD1;FI 
290 ‘IF 7-9 THEN SQU2C21;GOTO CLEAR;FI 
300 ‘IF 7-12 THEN SQU2[21; MA=MA+1; LOCI 38 
10,71; ?МА; SQU2L 53; FI 
310 ‘IF DDEX,Y3»1 THEN GOTO DIE;FI 
320 'DD1tX,Y,11;IF C=5 THEN DILX,Y, 12 EL 
SE D1EX。Y ,03;FI 
330 ‘FOR 1-1 TO 3; IF ВВ(І)<>0 THEN BB(I) 
zBB((I)-1;FI 
540 ‘IF BB(I)=1 THEN BOMBE 3;FI;NEXT 
350 'ST-0;M--M;IF M--1 THEN FOR V-1 TO 
s МОМЕ 1; NEXT; COLORE 3,72 ELSE FOR У-4 TO 
6; MONSE 2; NEXT; СО( ОКГ5,51;ҒІ 
560 'NO-NO*1;IF NO-8 THEN NO-1;FI 
570 'SOUI1LNO*30*10,0,15J1; WAITE15-RD/21;G 
OTO MAIN 
380 'MIZE;AD-2$2100-* (RD-1) *280; GO; LINEEL2 
4,20,5057187,1,0,21 
590 ‘FOR 2-0 TO 15;FOR 1=@ TO 21;DD1L[I,J 
01; NEXT; NEXT 
400 ‘FOR 2-1 TO 14;FOR Ісі TO 20;D1L[I,J, 
01; NEXT; NEXT 

'"МА=0; EG=Ø; FOR Ј=1 TO 14;FOR I-1 TO 


3 


‘JJ=PEEK (AD+G) 
‘IF JJ=1 THEN БО1Г1,02,21;РМТГ1І,2,82;Ғ 


440 ‘IF JJ=2 THEN D1LI,J,3J;PUTLI,J,92;W 
A-WA*1;FI 

450 ‘IF JJ= さ THEN р111,2,41;Р0ТГ1,27,152; 
EG=EB+1 FI 

460 'б=б+1;МЕХТ;МЕХТ; WA=WA-6 

470 ‘FOR 11=@ TO 4 

480 ‘ROOF; I-RND (19) +1; J=RND (13) +1 

490 ‘IF DLI,JJ=3 THEN D1LI,J,71;IF RND (3 
00) =55 THEN 01С1,7,82;ҒІ ELSE GOTO ROOP; 


'NEXT 
‘QQ; ISRND(19) +1; Ј=КМО (15) *1; IF DEI,J 
THEN D1tI,J,61 ELSE GOTO QQ;FI 
‘RETURN 

‘BOMB; IF B=Q THEN RETURN; ЕІ 
'BsB-1;D1LBX(1),BY(1) ,01; BOMB2CBX (1) 
。BY(1) ] 

550 ‘FOR I1=Ø TO 2;FO0R 21-0 TO 2 

540 “12-ВХ(1)%11-1;22-ВҮ(1)%71-1;ЗА-рГІ2 
39213 SA1=DD[ I2,J21 

570 ‘IF ЅА1=1 THEN GOTO DIE;FI 

580 ‘IF SA1>1 THEN SOU1C80,0,101;PUTCLI2, 
22,71; МА171501;РИТ12,272,01;001112,22,01 


の お か げ で す . 感謝 ! 感 
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മമ оо മമ 
FF FF FF 


ов 04 07 


; SCRF2]』SET1LSA1-1]』FI 
590 ‘IF SA=3 THEN WA-WA-1;PUTLI2,J2,71;W 
AITEL303;PUTEI2,J2,01; D1EL I2,92,01; SCRE 17; 
IF WA=Q THEN D1LI2,J2,93;PUTE I2,J72,101;8 
DU1[ 2 の 。 の 。2 の ]』 SOU1[ 40,20,151; SCRE 103; FI;FI 


500 ‘IF SQ=6 THEN PUTLI2,J2,71; WAITL 201; 
PUTEI2,J2,121;D1L I2,02,102;FI 
610 ‘IF SA=7 THEN PUTLI2,J2,71; WAITL 3Q1; 


PUTELI2,J72,19*FL11D1L I2,92,1123;FI 

620 ‘IF SA=8 THEN PUTLI2,J2,71; WAITL 301; 

РМТГІ2,22,141;р1г12,02,121;ҒІ 

550 'NEXT;NEXT 

540 ‘BX (1) =ВХ (2) 』BY(1)=BY(2) 』BX(2) 5BX (3) 

; BY (2) =BY (3) ; BB (1) =BB (2) ; BB (2) =ВВ (3) 

650 ‘RETURN 

5660 “ВОМВ2;РМИТІ%1,7Х2,61;500М2г12 

670 ‘FOR Ісі TO 12;LINELX1*24-I*2,42*12« 

8-I,41*24423*I1*2,42*12*19*1,4,2,11; NEXT 

680 ‘FOR 1=12 TO 1 STEF-1;LINELX1*24-I«*2 
,A2*1248-I,41*24423-I142,424*12*19*1,4,2,1 
l; NEXT 

690 'PUTEX1,42,01; RETURN 

700 ‘MONS; IF ടടഡാട THEN WAITL 1221; RETUR 

N;FI 

710 ‘IF MS(V)<> の THEN MAIT[121]』MS(V) =WS ( 
V)-1; IF DDEMX(V) МУУ) ]= の AND MS(V)=B TH 

EN PUTEMX (V) ,MY (V) ,151; FI; RETURN; FI 

720 ‘IF DEMX(V) +МХ1 (У) ,MY (V) «МҮ1 (У) 1>1 D 
R DDEMX(V) +MX 1 (V) ,MY (V) *MY1(V) 1>1 THEN W 

E1[];FI 

750 ‘IF MXi(V)=Ø THEN CHi=17+MY1(V) ELSE 
CH1=18+MX1 (V);FI 

740 “ррісмх(у» ,MY (V) ,@1 

‘IF CC(V)=@ THEN D1LMX(V) ,МҮ(У),012;Ғ 


'PUTEMX (V) ,MY (V) ,CC ഗാ 
‘MX (V) 2MX (V) +MX1 (V) ;MY (V) 2MY (V) +MY1 ( 


‘IF DLMX(V) 。MY ഡാ THEN CC(V)=5 EL 
SE CC(V) = の 』F1 

'PUTEMX (У) MY (V) 。CH1 ] 

‘IF DDEMX(V),MY(V) 1-1 THEN GOTO DIE; 


*DD1[MX (V) ,MY (V) ,V+11; RETURN 


820 ‘WE1;XX=MX1(V);YY=MY1 (У) 

850 ‘IF V-1 THEN WAY1[1;FI 

840 ‘IF V-2 THEN WAY2E3;FI 

850 ‘IF V=3 THEN WAYSL2;FI 

860 ‘IF V-4 THEN WAY4L3;FI 

870 ‘IF V=S THEN IF КМ№р (10) <5 THEN MAY1E 


1 ELSE WAYSE3;FI;FI 
880 ‘IF V-6 THEN IF RND(10)<S THEN WAY2EL 
1 ELSE WAYA4E3;FI;FI 


MX 1 (V) =XX』 MY1 (У) =YY3 RETURN; FI 
900 ‘IF F=1 THEN MX1(V) =ーMX 1 (У) 』 MY 1 (У) = ニー 
MY 1 (У) 』F= の 』 RETURN;FI 
910 “Ғ-і;ХХ--ХХ;ҮҮ--ҮҮ;б0Т0 TEST 
920 'WAY1;IF XX<> の THEN XX= の 』 YY=SGN(RND( 
2)-1); IF YY=Q THEN YY=1;FI;RETURN;FI 
950 ‘YY=0; XX=SBN (RND (2) 1 ) 』 IF XX=Ø THEN 
XX=-1;FI; RETURN 
940 'WAY2; IF XX<>Ø THEN ХХ=0; 
(V));IF YY=Ø THEN YY=-1;FI;RETURN;FI 
950 'ҮҮ=0; XX=SGN(RND(2)-1); IF XX=Ø THEN 
ХХ=1; ЕІ; RETURN 
960 'WAYS;IF ХХ<>@ THEN XX= の 』YY=SGBN(RND ( 
മു) -1 ) 』 IF YY= の THEN YYzs-1;FI; RETURN;FI 
970 'ҮҮ=0; XX=SGN(X-MX (У) ) 』 IF XX= の THEN X 
X21; FI; RETURN 


(М) ) 』 IF YY=@ THEN YYz21;FI;RETURN;FI 
990 'YY-0; XX= ニ SBN (メーMX( り ) ) 』 IF XX= の THEN X 
X=-13 FI; RETURN 


СІ28,10,71;?,МмА 

1010 ‘FOR 251 TO 2;FOR I=100 TO 140; SOU1 
[ 1 。 の 。 の ]』NEXTj NEXT 

1020 'IF МА=@ THEN GOTO OVER;FI 

1050 'GOTO START2 

1040 'OVER;WAITL2001;FOR 2-0 TO 12;FOR I 
=B の TO 100; 5001С1,0,72; NEXT; NEXT 

1050 'OVER1;LOCL10,13,73;?" GAME OVER 


1050 'WAITLS0023; GOTO START1 


FL=21 THEN FL-1;FI;FI 

1080 "SDU2[4]』RD=RD+ 1 』 IF RD= さ 1 THEN RD=1 
SFI 

10902 ‘GOTO START2 

1100 SET1』CC (ん 1 ) = の 』 IF Еб=@ THEN TK-TK-1 
; SS (ん 1 ) =1 

1110 
N;FI;RETURN;FI 

1120 ‘II=RND (20) +1; JJ-RND(14) +1 

1150 ‘IF DELII,JJ3-24 THEN E は =E ロ ー1 』 MX (7. 
II;MY (41) =J J ELSE GOTO SET1 ョ FI 


@ 
1150 'RETURN 


p Буа + TRISGCOR R (3305 ARZEL ELT. 中 に は 迎 夢 快 人 さん を 初め , 結構 有名 人 も い だ り な ん か し て …. 
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“ラー ん 。 まあ それ も いい で し ょ う 
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890 'TEST;IF ОгМХ (У) *XX,MY (V) +ҮҮ2<2 THEN 


YY=SGN (Y -MY 


980 'WAYA;IF ХХ<>@ THEN XX= の 』 YY-SGN (Y-MY 


1000 'DIE;PUTEX,Y,7J:WAITL 603; MA=MA-1; LO 


1070 ‘CLEAR; IF RD/2*2-RD THEN FL=FL+1; IF 


‘IF TK= の THEN GOTO CLEAR ELSE RETUR 


ん 1 ) = 


1140 PUTETI1I。JJ。11]』D1E1T。JJ。2]』 WS(X1) 22 


00 00 02 
മമ മമ 00 


മമ മമ മമ 
മമ മമ മമ 
FF FF FF 


@2 
മമ 
FF 


02 02 02 
മമ മമ മമ 
FF FF FF 


07 ØC да 02 05 OB 07 ØA ØA 05 


リス ト 3 BOMB BOMB ソー ス ・ J ХР mme 


1160 'SET2; II-RND (20) +1; JJ=RND (8) +1 

1170 ‘IF DEII。JJ]= の THEN МХ(/1)-11;МҮ(У1 
) =JJ』 PUTEII,JJ,1821: SDU1[ 1 の の മ, 221; WAITES 

മാ ELSE GOTO SET2;FI 

1180 'RETURN 

1190 'DEMO;LINEL24,20,503,187,1,0,21 
1200 'SYML127,31,6,5,6,0,0,4,"BOMB"1; SYM 
[223,63,6,5,5,0,0,4,"BOMB" 1 

1210 'LOCIL24,14,71; ?"8";LOCE 24,15,725?" I 
";LDCL22,16,71;?"A—  —6";LOCE24, 18,71; ?" 
I^ ;3LOCE24, 19,71; ?"2";L0CL 24,21,715 ?"SPAC 

E" 

1220 ‘FOR 1=@ TO 2;PUTL6*I,5,51;PUTE14*I 
333513 PUTES*I*2,8,51; PUTES*I*2,10,51; NEX 

Ts PUT[ 16。1 の 。1]』PUTE14。13。5] 

1230 ‘FOR 11-0 TO 2;ВОМВ2(5%11ж2,81;РМТІ 

S+II*2,8, 183; BOMB2LS*IIX2, 102;PUTLS*II«2 
,19, 161; NEXT 

1240 'LOCL7,20,73; ?"HIT RET KEY"; 1-0 
1250 'REPEAT;I-I*1;K-GET;IF K-13 THEN RE 

TURN;FI;UNTIL І-20000; GOTO DEMO 

1260 'SCR;SC-SC*X1;IF 5С>9999 THEN SC=SC 

-10000;FOR ІІ-0 TO S50; UP (ІІ) =0; NEXT; FI 
1270 ‘IF ОР(5С/2@@)=@ THEN МА=МА+1 ; LOCI 3 

8,10,713; ?MA; UP (SC/200) =1; SDU2[ フ 7] ョ FI 

1280 'LOCLZ4,7,71; ?*4,SC; IF SC>HS THEN Н 

S-SC;LOCL34,3,71; ?8A, HS; F I; RETURN 


1290 'D;DMY-GA:41**42*22); RETURN 

1300 'D1;G0:7414*42*22) 2435; RETURN 

1510 ‘DD; DMY-GA51:7.1*42*22) ; RETURN 

1320 'DD1;G01:7Z1-42*22)-43; RETURN 

1330 'WAIT;FOR IJ1=@ TO 100; ҒОК JI1-0 TO 


X1; NEXT; NEXT; RETURN 
1540 'LOC;HLTEJ;CPOKE ADDR,$3,5,$912,*1,7 
24,911,743; SUBE 2; RETURN 
1350 'LINE;HLTE 1; СРОКЕ ADDR,$15,7*6,*5,71 
8.4298, 458,448 ,747: SUBEJ; RETURN 
1360 ‘SYM; DMY1-749; HLTE 1; CPOKE ADDR,$19,7. 
5,/6,77,%5,/4,%1%,72%,%8;ҒОН DMY=Ø TO 7*8 
—1; ADDR: DMY) =DMY 1 : DMY) ; NEXT; SUBE 1; RETURN : 
1370 'COLOR;POKE $FD38-471,72:RETURN 
1380 'HLT;CODE $B6,$FD054,92BFBM*,$1A450*; 
POKE ൭൧൧൭൭ , $80; CODE $B6 , $FDOS#H , $2AFB#; AD 
DR-$FC82; RETURN 
1590 'SUB; POKE $FDOS,0; RETURN 
1400 “РОТ; BYT= さ 6』 AA=S1000+108%743 
1410 'NN=Z2*12x80+1X1*3+640; FOR Ni-0 TO 2 
;MCTE 3 
1420 'CPOKE ADDR,$93,$9C83094,$90,NN*,129; 
FOR N2-0 TO 56; ADDR: №) =АА: М2) 
1430 'NEXT;SUBLJ;HLTE 1; SUBE 1; NNZNN*- $4000 
; АА=АА+ВҮТ ; NEXT; RETURN 
1440 ‘MCT; HLTE 3; ре: ADDR,$3F,'Y','A', 
M' ме U^ 6^, SR. ; ADDR=$FC8B; RETURN 
1450 'WID; vi AD ADDR,$1,0,40,25,0, 
25,0,1,0; SUBE J; RETURN 
1460 “CLS; ?CHR$ (12) 
1470 "MCT[ ]』CPDKE ADDR,$91,$9D3934,$9C830*9 
, 48#, $90, $B, $D409% , $8EDI# , $BFEE# , $81 10# 
, ФАЕВ1#,%ЕСВ1#,%ЕПОС4#,®%А&5В@#,%А742#,%55С 
В%,65051%,%5Ғ205%,%Ғ1В7%,%0409%,%В504%,%0 
A3994; SUBE 1; RETURN 
1480 'PSG;POKE $FDOE,41;:POKE $FDOD,3;POK 
E $FDOD,0;POKE $FDOE, a йы $FDOD,2;POK 
E $FDOD ,0; RETURN 
1490 ‘PSG1; PSGLO,0231; PSGL1, Q3;PSG[8, %0Ғ1; 
RETURN 
1500 “5001;Р561Г1;Р56Г7,ӨҒЕ2;Р8О0Г0,%12;Р 
SB[ 1 。X2]』 MAIT[X さ ]』PSG[ 7 , $FF 1; RETURN 
1510 'S0U2;PSG1L1;PSGL7,9F 3523: IF 71=1 THE 
М FSGEL 6,523; WAITE802; PSG8L 12,153; PSGE 15,33 
s PSB[ 6 。 15]』 P88E8,151; RETURN; FI 
1520 ‘IF X122 THEN PSG[7,$F81;FOR 1=250 
TO の STEP-10; SOU1E0,I1,02; NEXT; FOR I=250@ 
TO 10 6ТЕР-10;500111,0,01; NEXT; PSGE7,$FF 
J; RETURN; FI 
1530 ‘IF 71-5 THEN SOU1£50,0,101; WAITCSØ 
1;5001(50,0,101; WAITC5Ø]; FOR 1-50 TO 0 S 
TEP-1;SOU1LI,0,02J: NEXT; PSGE7,$FF31; RETURN 
;FI 
1540 ‘IF 71-4 THEN FOR 0-0 TO 2;5001г40- 
J*10,0,10J1; WAITL 801; FOR I=ØTO 50; 50൨101, 
0,031; NEXT; NEXT 
1550 ‘FOR I=@ TO 7;S0U1r150-I«20,0,103:W 
АІТ(701;МЕХТ;МА1ІТ(501; SOU1 [ 1 の の 。 の ടമാ; SOU 
1г100,0,201; RETURN; FI 
1560 ‘IF 71=5 THEN S0U1L190,1,10031: WAITE1 
の の ] 』 PSB[ 7 。 ま F さ ] FDR 2-0 TO 2;WAITE S23; FOR 
I=@ TO 15;PSGL6, IJ; WAITC2]; NEXT; NEXT; RE 
TURN;FI 
1570 ‘IF X126 THEN FOR 2-0 TO 3;FOR 1-10 
TO 20:S80U1L1,0,01; NEXT; FOR 0-50 TO 80;5 
DU1ELG,0,0J; NEXT; NEXT; МАІТС 10023: RETURN; FI 
1580 ‘IF 41-7 THEN FOR 1=5@ TO 70;SQUILI 
,0,01; NEXT; FOR І-70 TO ടമ STEP-1;SOUILI, 
9,01; NEXT; RETURN; FI 


ぃ いや ー, これ も PiO 
ある い は 「 み な みり ょ うこ フ 
と に か く 皆 で 仲良 く や っ て いく つも り で 一 す . 今後 其 よ ろ し 
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IC より も 楽に で きま す . な に し ろ , だ つ だ 16 個 の キー レ 
ガ 使 わな い の で すか ら / | | 
今回 の “ビギナー ズ ・ ガ イダ ンス "は FM-/ 用 の “GO_ 
VLINS" TTS, 他 の 機種 の 人 に も 参考 に な る は ず で す . 


“マシ ン 語 の 入力 な ん て …" と 思っ て いる 人 は いま せん 
か SE, BASIC だ け を 入力 し て いる 人 に と っ て は 


が な り し ん ご どい も の で す . 
|» し か し, マシ ン 語 の ゲー ム は と て も 高速 で と て も 面白 


い の で す . し か も, 簡単 に 入力 で きる よう に な れ ば BAS 


マシ ジン 語 を 
入力 する 前 に 


マシ ン 語 の プロ グラ ム を 入力 する に は 。 
充分 な 準備 が 必要 で す . この GOVLINS の 
_- よ うに 長い プロ グラ ム の 場合 . 入力 する の 
に 1 週間 以上 か か っ て ち 不 思 議 で は あり ま 
TA. 心 の 準備 は いい で し ょ うか ? 途中 
で いや に な っ て も ゲー ム は で きま せん よ 。 

まだ , 正しく 入力 る され だ か の チェ ッ ク も 
そう 簡単 に は で きま せん . その た め に 必要 
な の が チェ ッ ク サ ム ・ デ ログ ラム で ず 。 1 
の プロ グラ ム を 使う と 。 マシ ン 語 が 正しく 
入力 され だ か どう か を 簡単 に 調べ で る こと が 
で きま す . これ は BASIC プロ グラ ム な の 
Tr: AS CIELAB 

Ot. チェック サム ・ ブ ログ ラム は もう 
入力 で きま し た か? テー に セー ブ し た 
БЖ Zh. SAL TAS 29: 


ラン 
で は RUNIRETURN| と 入力 し て くだ さい . 
+Z L “Top Address? “と 開い て きま す . 
ここ で は 一 応 人 22OOO RETURN と し て くだ る 
O. きら に “End Address ? "と 聞い て きま 
+. 2OFF|RETURN| と 入力 し て くだ さい . 
GOVLINS の リス ト と 同じ よう な 形 で 画 


面 に 表示 る られ まし た か ヵ か? 内容 は 違う か も 
し れ ま せん が 。, 格好 が 同じ な ら 第 1 段階 は 
X ue ary E 9 

ELT, ブロ グラ ム が 完全 に 正しく 入力 
され だ か を も う 一 度 確認 し た ら ま た テー ジ 
ETT まし ュ う 。 


チェ ッ ク サ ム ・ リ スト の 
見 方 

チェ ッ ク サ ム ・ リ スト を 以下 の よう に 6 
つの 部 分 に 分 け て 説明 し まし ょ う . 

まず , 真ん中 の 縦 16 バ イト 横 16 バ イト 計 
256 バ イト の 16 進 2 桁 の 数 字 . これ は メモ 
リ DNET, この 部 分 を 皆さん が 頑張 っ て 
入力 す る の で す . 

KU, "Add" の 下 に 16 個 続く 4 桁 の 16 
進数 , これ は 各行 の 先頭 アド レス を 示す も 
D. そし て "Add" の 右 の +1 ーー+F は 左 
の アド レス か ら 何 バイ ト 目 か を 示し て いま 
T. すなわち , 右 の アド レス 部 分 が 2070 の 
IT EEO +t 9 の 列 が 重なっ た と ころ は 2079 
番地 の 内 容 を 示し て いま す (出力 例 を 見 て 
くだ さい )。 

そし て , 右上 の "Sum" の 下 に ある 16 個 
の 2 桁 の 16 進 数 , これ は その 行 の 横 の チェ 
ッ ク ・ サ ム , だ と えば 2070 の 行 な ら ば 2070 一 
207F ま で の チェ ッ ク ・ サ ム で す . 

まだ 。 左下 の "Sum" の 右 に ある 2 桁 の 


> 
ёз 
2 J 


16 進 数 , これ は その 列 の 縦 の チェ ッ ク ・ サ 
ム , だ と えば +9 の 列 な ら ば 2009, 2019, 2029, 
sy 20F9 の チェ ッ ク ・ サ ム で す , Ер 
RDI FT AP 2 2 桁 の 16 進 数 これ は 
この ブロ ッ ク 全 体 の チェ ッ ク ・ サ ム を 示し 
て いま 7. 

な お , 次 ペー ジ の 出力 例 に も それ ぞ れ の 


説明 を 載せ て お きま す . 


^\ 
VAE » Е. К ) к { 2 4 Е 
| ат см МАСЫ کا ر‎ Pi 2 റ്‌്‌. യന " +. дама も 
Қау STs ЛУ) e (S REP m^ M^ Fr d br SS ы а QD Av aar a ақы ADAM 
Ж. "n p y Тақ ® PE M АА ЖС て あか っ 17 സ т d ^ 
ELMO er an നക; പ്പ, ыс: cs റ്‌്‌ Nh іа ҚАТА CY ati “> PN, AUOD Z; 


マシ ン 語 の 


を それ で は いよ いよ マシ ン 語 の 入力 で す . て 
シン 語 の 入力 に は マシ ン 語 モニ タ と いう の 
を 用 意 し な けれ ば な り ま せん が , FM- 7 で 
は 最初 か ら 持 っ て いる の で 特に 用 意 す る 必 
要 は あり ませ ん . | ; 

マシ ン 語 モニ タ を 使う た め に は BASIC 
で の ダイ レク ト ・ モ ー ド (電源 を 入れ だ と 
き の モ ー ド ) CMON RETURN と 入力 し ま 
Yd. する と "ж" が 表示 る れ て コマ ンド 入 
カカ 待ち の 状態 に な がり ます . 

マシ ン 語 を 入力 する に は M コ マン ド を 使 
o £d. で は AA2OOO RETURN] と 入力 し て 
(772%, 

2000 ഘ-B ( 画 は カー ソル ). 
と 表示 る れる は ず で す (727 は 16 進 2 KID 
ЖС). 2 8122000 ЕҢ ОРУ ЭС 2 
と を 示し , あな だ が どの よう な 値 に 変え る 
か を 待っ て いる 状態 で す . この と き , [O] ~ 
[9] Ok E [A] 一 |F| の アル ファ ベッ ト を 使っ 
て 16 進 2 桁 の 数 字 を 入力 し て や れ ば いい の 
T 

で は , 実際 に GOVLINS の マシ ン 語 リス 


ト を 見 な が ら 入 力 し て み ま し ょ う . 2000 番 
地 の 内 容 は "Add" 27200001; E “+ 0” 


の 列 の 重なっ だ ところ, すなわち 16 C 
すね . 16|RETURN| と 入力 し て くだ さい . 
する と 。 先程 と 同じ よう に 

2001 л – В 

と 表示 され た でしょ う . 今度 は 2000 の 行 
t “3-1” の 列 の 重なっ だ と ころ す な わ 
b "36" で すか ら 36|RETURN| と 入力 し ま 
+. 

ജ (3.24 2.7). പപ 
わけ で す . 2088, リス ト を 左側 に 置い 
て 左手 の 人 差し 指 で 番地 の 内 容 を 押 き ぇ な 
が ら 6 右手 で 入力 し て いけ ば か か なり 楽に な り 
šT. 

まだ も し 間違っ て 入力 し て し まっ て も 。, 
カー ソル ・ キ ー や |pEL| キー で 簡単 に 入力 し 
直す こと が で きま す (詳し いこ と は マニ ュ 
アル を よく 読ん で くだ きい ). な お |BREAK | 
キー で BASIC モ ー ド に, 16 進 以外 の 文字 を 
入力 する と M コ マン ド か ら 抜 け ま す . 


プロ グラ ム の 
セー プ ブ の 前 に 


よ ぐ 読ん で 高速 ゲー ム を 楽し ん じ や いま し よう / ® 


マシ ン 語 ゲロ グラ ム の 入力 に は どう せ 時 
間 が か か る の で すか ら , こま め に テー プ に 
ag SOT a 

ЕТЕКСЕФСАЛТЭӘЗІОЫТЫС 
こ で は 2FFF 番地 まで 入力 で きた と し て 説明 
DE лы” 

CX [BREAK] キー で BASIC モー ド に 戻 
っ てく だ さい を も て チェ ッッ の クサ n 
グラ ム を ロー ド し , RUN し ます . 今度 は 

"Top Address" に は 2000| RETURN |, 
"End Address" に は 2FFF|RETURN| С 
ね . 

リス ト が 順に 表示 る れ ま し だ ね . まず は 
2000 一 20FF ま で 表示 され た ら [ESC] キー で 
出力 を 止め て くだ さい ( 再 ス ター ト に は [5 
PACE| キー な ど を 押し ます ). 

正しく 入力 る きれ て いれ ば 今度 は 表示 きれ 
た の と リス ト と が 内 容 ま で 同じ に な る は ず 


TY. 要 は この よう に し て 本 紙 の リス ト ょ と 


チェ ッ ク サ ム ・ ブ ログ ラム の 表示 する リス 
ト を 比べ て , まっ だ く (同じ に る きせ て いけ ば 
いい の で す 。 

Cb E> ESAT AT ISR 
ドレ ス を 1 つ ず つ 確 認 し な が ら リ スト を 見 
比べ る な ん て , 気 が 遠 く な る よう な 話 だ と 
思い ませ ん か ? 

そこ で 登場 する の が チェ ッ ク ・ サ ム で す . 
これ は だ ただ リス ト の 内 容 を 縦 と 横 の 16 バ イ 
ト ず つ を 単に 加え だ た だ け の も の で す が 。 か 
な り の 確率 で 間違い を 見 つけ 出し て くれ ま 
す . 

で すか ら , あな だ は この チェ ッ ク ・ サ ム 
を 見 比べ きえ すれ ば いい の で す . 見 比べ て 
チェ ッ ク ・ サ ム が 違っ て いた だ たら その 行 ま た だ 


は 列 の 中 に 少な く と も 1 つ は 入力 ミス が あ | 


6ЕСЗСЕСТ,ЕССФОФОАОІЗ XL 
た アド レス を すべ で て メモ し て お いて (жж 
の リス ト に 〇 印 を 付け て お な おく と わか ヵ かり PF 
く な る と 思い ます ), 後 で その アド レス の 内 
容 を 入力 し 直し て や れ ば いい の で す . 


マシ ン 語 プロ グラ ム の 


E 


正しく 入力 され だ の が 確認 で びき だら 。 Т 


ぐに テー に セー ププ し まし ょ う . 確認 し た 
ら す で も セー デブ プ 。 
だ きい れ ね. 
マシ ン 語 の モー ブ は , [BREAK | キー で BA 
SIC モ ー ド に 戻っ て か ら 行 な いま す .。 SAVEM 
“ファ イル 名 ", &H2000, &Hhhhh, &H 
2OOO|RETURN| で テー プ に モー ブ さ れ ま 
+. な お , 77 は それ まで 入力 し だ 16 進 の 
アド レス で すす に ҒХЕХЕОЕРЕ CONE 


72:5 SAVEM “GOVLIN2F”, &H2000, 

&H2FFF, &H2000|RETURN| t L í +. 
た だ し , マシ ン 語 プロ グラ ム は BASIC 2 

ログ ラム と 違っ て どこ か ら ど こま で 入力 し 


と いう 順序 を 必ず 守っ て くく 


പ്‌. 今月 の PiO な ゲー ム 


B @O VEINS 


マシ ン 語 
ゴゴ プリ ンス "Агу 
SOR 


Sune, di 2 48 
画 プ ログ ラム ・ イ ン フ ォ メ ーション 誰 に も 立ち 入ら せ は し な い , 何 が 現われ プロ グラ ム 中 に は グラ フィ ッ ク ・ デ ー タ 


t b. «iis Уз ` 50 AS (റ്‌ ¥ 
m よう と , бз uv LCS 2 £ / が 多い の で , ft 

елер ടാ シュ ー テ ィ 側 に デー タ を 送り 直し て いま す . tone, 

— И 2 種類 の 敵 が 同じ 面 に 出 て て る こと は あり ま 
>. 

ЕТТЕ アウ グラ / の 説明 せん . その か わり , 敵 の 動き に は それ ぞ れ 


種類 ご と に 変化 が あり ます . し か も 動き は 


&H2000 —&H612F š CO$J16K^*4 F C 非常 に スム ー ズ で 。 フィ パタ ダ ターン が チラ つく こ 
e d. アセ ンプ グラ で 作っ た だ 本体 の 他 に , グラ と も あり ませ ん . 
ജാം 地下 世界 。 魔境 . と ん な 風 に 呼 フィ ッ ク ・ デ ー タ 。 自作 の 3 重 和音 タイ プ w pusu sy Bray PE Ag 
ん で も いい . EEL, ここ は ぼく だけ の 世 の MUSIC シー ケン サ , お よび 音符 デー タ к ത്യം ар 
F, (Zl だけ の 場所 … RET に 名 付け た 方 っ て い ы 
だ か ヵ か 簡単 に は わか り ま せん の で , どこ まで ちゃ ん と テー に セー プ し た ら 完 成 で す 。 ie. 間違い を 見 付け た ら 入 力 し 直し て か ら 
入力 し て モー プ し た の か , その アド レス を チェ ッ ク ・ サ ム は すべ で て 合っ て いま し だ た だ か モ セーブ し て くだ る いね. 
メモ し て お か な けれ ば な り ま せん . この と ? 1 プ ブロック に だ と え 33 個 し か な い チ ェ എനിവയം 
5, 入力 は 256 バイ ト (リス ト の 1 プ ブロッ ッ ク ・ サ ム で も , GOVLINS ほ どの プログ プロ グラ ム を モ セーブ し た テー ジ は 大 切 に 保 
>) ご と に し ,。 セー する と き に を の 16 進 ラム に な る し と 2165 個 も あり ます . WL TESS UTD CAR ATL 
アド レス の 上 位 2 桁 を ファ イル 名 に し て お な お , この GOVLINS で は プロ グラ ム の と ころ で , 今回 の チェ ッ ク ・ サ ム は BAS 
け ば わか りや すく な る と 思い ます (先ほど の - 部 を 自分 で 書き 変え て し まっ て いる だめ, IC の も の を 使い まし た が 。 РіО, "84 年 12 月 
例 を 見 て くだ さい ). 度 実行 し て し まう と チェ ッ ク ・ サ ム の 値 号 の p.180 に は 高速 で 動く マシ ン 語 の チェ 
ち も ちなみに , マシ ン 語 の ロー ド は LOADM が 変わ っ て し まい ます 。 チェ ッ ク ・ サ ム の > കയ്കള്‍ 
"ファ イル 名 "| RETURN| です. 確認 は 必ず 実行 する 前 に し て くだ さい . シン 語 を 楽に 入力 で きた ら こ の プロ グラ ム 
27: 遊び 方 どなり に ゲー ム が で きま す を 利用 し まし ょ う 
>? #Ф&(С7:5, お か し な 動作 は し ませ 
А»? その よう な と き は 必ず 電源 を 切 り , 
マシ ン 語 プロ グラ ム か が すべ て 入力 で き て テー か ら ロ ー ド し て チェ ッ ク ・ サ ム の 確 


ИИ > チェ ッ ク ・ サ ム 付 き マ シン 語 ダ ンプ ・ リ スト 出力 例 Е НЕ FM -7 用 チェ ッ ク ・ サ ム ・ プ ログ ラム BASIC А" — 


5 10 ' Check sum for FM-7 
この アド レス か ら 何 バイ ト 目 か を ここ を 入力 する わけ で す . 20 CLEAR ,MHFFFIDIM SUM(15) 
ここ が 教え て くれ ます . 50 WIDTH 80, 
EU ID 27 3X ser Heer Mey Aen THa ER FEAT ED ЖЕТЕР] Sum 40 DEFFNCH$(E, ,F) =RIGHT$ (STRINGS (Е, "Q") +H 
の の の の の Go DUE DU 7 の の 2 ЕХФ (Р) Е) 

SQ INPUT "Тор address"; S$: S=VAL ("£H"«LEF 
T$ (S$,LEN(S$) -1) «"Q") 

60 INPUT "End address";E$:E-VAL("&H"4«E$) 
70 FOR =S TO E STEF 16:50М-0:ІҒ RIGHTS ( 
НЕХ%(А),2)-"00" OR A=S THEN GOSUB 110 

80 РФ=ЕМСНФ (4,4) +" " 

90 FOR 1=@ ТО 15: р=РЕЕК (1+A) :РФ=РФ+ҒМСНФ 
(2,0) +" ":GUM-SUM*Ds SUM (1) =SUM (1) +0: NEXT 
100 P$-P$-«":"«FNCH$(2,SUM) : 60508 150: МЕХ 
7: GOSUE 130: CLOSE: END 

110 IF A=S THEN 120 ELSE GOSUB1ZØ 

120 P$-CHR$(12)*"Add  ":FOR 1-0 TO 15:РФ 
=P'$+"+"+HEX$(I)+" ":iNEXT:PS-P$-"Sum":GOT 
О 150 

150 P$-STRING$(57,"-")1GOSUB 150 

140 P$-"Sum:":SUM-Q:FOR 1-0 TO 15:P$-P$4 
" "*FNCH$ (2, SUM (ID) : SUM=SUM CI) *SUM: SUM (І 
2000 一 20FF の チェ ッ ク ・ サ ム ) =Ø: NEXT:P$-P$-" ; "+FNCHS (2, SUM) +СНКФ (10 


縦 の チェ ッ ク ・ サ ム の チェ ッ ク ・ サ ム ) s SUM=@:; GOTO 150 
2079 番 地 の 内 容 は 01H で す . "0757 ISO PRINT Pe 


160 RETURN 


BAVA 5.15 IS VE VIZ. 
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TEY 
2 や ラブ 
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2i DD Fi 7:91 Ав ар 7B Qi DHEA oL E777. ヒト 


ウッ トイ の トレ ー ナ ー が ほし い ノ が 。 私 は FM- 7 の User だ か ら 5S1 の ウッ トイ ゲー ム 大 会 に 投稿 し た っ て ムダ な ん で すね ー. nt 
会 や や っ て ほし いと 思う . PS. みなみ りょう こき ん か ら 「 ほ っ て ん と っ と 」6 全 を 通販 し て も らい まし た だ. か な り 前 か ら SIN S. A 
Р.5.2 Pi0 1 号 か ら 読ん で いる けど , 5, ത്യ 


ЭА А. Ta Re Єл А tt h 
СКУД Ша, | аео. РОГИ 

е i Ж യ നം 
` š Vica ച റ്‌ て が あけ か た ОЛИ, 


Er esau) 。 
文 お 許し à | SRR ТУА: S rd heus | TEN 
im м ലി ғы SANE "s " g: 4 Я റ; ќа z 9 BE 24 ESSAN $ PU. e SE d ] 

DAR EL iis MOOR Sepe e OE RICE A RARO e cq ан ipis ] 


の ゲー ム に 必要 な ミサ イル 発射 , 円 盤 発射 , 
シュ ー テ ィ の 移動 , FED lin E DX — 
操作 を すべ て 同時 に 行 な を ます . 

この 方 式 は , 前 作 の モン シブ ル ・ タ イム 
(PiO'84 年 12 月 号 ) と いう ゲー ム で も 使っ 
て いる の で (こち ら は 氏 コ ユ コンパイラ で 記述 
し て いま す ), そ ちら の 方 を 参考 に し て くだ 
きい. 

Же, MUSIC シーケンサ に つい て 説明 し 
ます . 聞け ば わか る と 思い ます が 3 チャ 
ン ネ ル そ れ ぞ れ に 別々 の エン で ご ロープ" が 使 


その キー を 中 心 と し だ 8 個 の キー で それ ぞ 
れ の 方 向 に 進み ます . 

WB 015, ミサ イル を 何 発 か 打ち 込 
むか , 円 盤 を 当て な けれ ば な り ま せん (m= 
ン ペ ラー だ け は 別 で す が ,。 その 方 法 は 自分 
で 見 付け て くだ さい)。 

ミサ イル の 発射 は [S| キー, 円 磐 の 発射 は 
[D] キー を 押し ます . ミサ イル は 最大 8 個 ま 
で 連続 発射 で き ます. 

ミサ イル , 円 盤 と も に 発射 方 向 は 黄色 の 
矢印 で 示さ れ , その 方 向 を 変え る に は [Z|[x| 


റ്‌. $E. オー プ ニ テン グ の メロ ディ に [C] の 3 つの キー を 使い ます . [Z] キー で 左 回 
ドラ ム の 音 を 使っ て いま す が 。 アク セ モント [X] キー で 回 転 の スト > 2, [C] キー で 右 
を 付け る だ ため に 音量 を 変化 る 3 きせ て いま す . 回 転 し ます . | 

つま り , エン ベロ ー プ の 設定 と 音量 の 設定 な お , 円 盤 は 一 度 発射 し た 後 で も 進行 方 ന്‌ 
が 1 つの チャ ン ネ ル に 対し て 同時 に 行 な ぇ 向 を 変え た る こと が で きま す . た と ぇ えば, И. nt, 


CA) に 


wa a. 


7 Кихі#&4Н2000 Tt. を 
ワー ク ・ エ リア に は &H1400—&H 


SOTT ちな み に , この シー ケン サ に つ に 発射 し て も , 回 転 キ ー を 押せ ば を その 方 向 IFFF を 使っ て いま す . ゲー ム を 終わ ら せ 
いて は 近い うち に 発表 する つも り で す . に 進み ます . る に は , SMS E MT: 


を そして, 敵 を 全部 倒す と 1 面 ク リア で , f L TARI: 
敵 が 1 人 ずつ 増え , 3 面 ク リア する と 数 は 


頑 に 戻り ます が 次 の 敵 に キャ ラク タ が 変わ 


APUA 
| 
り ま す . £7, 15 面 クリ ア ご と に 山 が 1 個 


シュ ー テ ィ (主人 公 ) を 動か す に は テン ずつ 増え ます 
・ キ ー を 使い ます . [5 中 | キー で スト ッ プ し , ! i | A 


それ で は …。 
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v - 
"re лаа +Ø +1 +2 +3 +4 +5 +6 +7 +B +9 +A +B +C +D +E +F Sum SB の の ØF FC മമ 00 05 ҒҒ മമ മമ മമ FF CO CO 00 SF Fš CO :7E 
m. 2600 മമ മമ の の の の മമ OO 00 00 IF FF OO മമ OO OO QQ QQ :3E 2B10 00 ОҒ ҒҒ CO QQ 02 ҒҒ CO മമ OO FF CO 00 02 FF CO :11 
capa hone ^ 2610 00 00 00 OO CO OO FO go FF FC FQ 00 ‘CO മമ 00 മമ :5в 2B20 00 ØF FF CO QQ QQ QQ മമ മമ OO の の OO OO OO OO OO :CE 


Ç 2620 00 QQ മമ QQ QQ മമ OO OO FF FC OO QQ മമ QQ の の の の :FB 285 00 の の OO OO の の OF FO മമ മമ ОҒ FO OO QQ ОҒ FO QQ :FD 
NA ` | 2650 QQ QQ QQ QQ OC 00 Q QQ QQ CO оо 250 00 OC 00 OO :0в 2540 00 OF FO മമ മമ ОҒ FO 00 മമ OF ro QQ QQ ОҒ ҒО OO :FC | 
2640 ØC 00 さじ മമ FC OO 02 の の OO CO の の 20 の の മമ OO QQ :57 || 25൧ മമ ОҒ FO മമ OO ОҒ FØ 00 01 ҒҒ FF 80 മമ 7F FE 00 :FA 


EN 2650 മമ の の 50 മമ OC മമ の 3 മമ മമ CO OO зо の の മമ の の QQ :2F 2860 00 iF F8 മമ OO 07 EO മമ OO 01 во മമ മമ മമ മമ മമ :7F 
"i 2660 മമ മമ 01 80 の 1 ദമ の 1 80 の 1 80 01 80 O1 80 01 80 :87 2870 оо മമ の の OO OO OO OO OO മമ മമ മ OO മമ OO OF CO :D2 
2670 ОҒ FO 07 EO 05 CO 01 80 01 80 の 1 80 01 80 00 00 :AD 2вв0 മമ 00 3F FO മമ OO FF CO 05 05 FF മമ 05 CF FC മമ :C1 


ы 2680 01 80 01 ദമ 01 BQ 01 80 01 BQ の 1 во 0: во മമ の の :87 2В90 03 ҒҒ FO 00 02 ҒҒ CO QQ 05 ҒҒ 00 മമ 02 ҒҒ CO 00 :78 
Бұ | 2690 മമ QQ OO OO OO ദമ OO CO മാ OO OC മമ 32 മമ OO QQ :2F ご BA の 5 FF FØ മമ の の മമ മമ മമ മമ മമ OO OO OO OO മമ OO :F2 
AO : | മമ മമ 50 の の 3C മമ ZF മമ CO の 3 മമ OC മമ の の の の മമ 00 :7А 2BBO മമ OO の の OO OO OO の の の の の の മമ の の OO മമ OO の の മമ : の の 


Кл | 26B の മമ മമ മമ ос മമ ദമ മമ CO 05 മമ OC മമ മമ മമ മമ മമ : の E || 2ECO മമ 50 മമ മമ മമ ғо മമ മമ 05 FO മമ മമ ОҒ FF FF FC :1C 
ID മലമ оо の の മമ മമ മമ മമ FF FC മമ മമ の の മമ の の മമ മമ QQ :FB || 2BDO 3F ҒҒ FF FC ОҒ FF FF FC 02 FØ മമ മമ മമ FØ മമ മമ :25 
хы 2.00 മമ മമ മമ 03 മമ OF 3F FF മമ OF OO 05 മമ മമ മമ മമ :62 || 2BEO മമ 30 മമ മമ OO മമ മമ മമ മമ OO മമ മമ മമ മമ മമ മമ :50 
Же. 26E の മമ മമ の の മമ മമ 00 SF FF മമ മമ മമ മമ മമ മമ മമ の の :5Е || 2EFO മമ മമ മമ മമ の の മമ മമ മമ മമ മമ മമ മമ 23 FF F മമ :F2 
EUR 26F の .00 00 зр рә: QC 00:03 04 の の CO の の 50 00 00 Өр ൭൭:2൦ ||| —— س شت یی ج جال سا مک ل ت‎ ല്‍ 
о | ടട Sum 54 B4 F4 АС 15 24 р 7C ØD FF 20 00 18 9B 8A SC :2F 
Ж Sum 1С Ай AS 2B ES 6E 7C BA 49 86 17 43 F3 8C 01 80 :3E 
der Add +0 +1 +2 42 +4 «5 +6 +7 +B +9 +A +B +C +D +E +F Sum 
AED Add +0 +1 +2 +3 +4 +5 +6 +7 +B +9 +A +B +C +D +E +F Sum || 2C0 05 FF CO 00 05 FF മമ の の 05 FF CO മമ 05 FF FO മമ :78 
E 2700 മമ മമ の の മമ ос മമ 05 മമ മമ CO OO 3F മമ IC 00 50 :7 || 2C1 の 05 CF FC മമ 05 05 FF മമ മമ മമ FF CO മമ മമ 3F FØ :С1 
г 2710 മമ の の の の മമ OC മമ മ: മമ മമ CO മമ ദമ മമ ØC മമ の の :0в || മമ്മ മമ മമ QF CO മമ മമ മ മമ മമ മമ മമ മമ മമ മമ മമ മമ :D2 
യ | 2720 മട の の 24 മമ 48 10 82 40 82 40 48 10 24 മമ മട മമ :B6 || 2C3 の ВЕ D3 Ва 20 05 Ab 84 4С 26 01 59 Eé 02 58 58 86 :14 
ше 2730 മമ മമ മമ മമ OC ご の の 1 во 01 во ос മ മമ മമ മമ മമ :7^ || 2°40 50 3D EB 01 89 മമ iF 05 66 B4 26 3C 10 AE 05 86 :BB 
に 2740 07 EQ 3F FC 74 2E FØ OF ҒО ОҒ 74 2E SF FC 07 EO :86 || 2C5 の 10 54 02 7D D4 09 ЕС А! ED Сі ЕС Al ED C4 EC AB :Ар 
IM hz 2750 02 മമ മമ മമ മമ の の OO മമ OO മമ മമ の の മമ മമ മമ മമ :00 || 240 5С ED С? 3F FE ЕС АВ ЗЕ ED C9 40 00 EC АВ 7C ED :F4 
Md 2750 മമ മമ の の の の മമ OO മമ മമ മമ മമ OO മമ മമ മമ മമ മമ :00 || 2270 CY 7۴ FE ЕС AB 7E ED C9 80 00 52 CB 4E bA E4 26 :4B 
Ети 2770 മമ മമ മമ മമ മമ മമ മമ മമ OO മമ മമ മമ മമ മമ മമ മമ : || 2сва DS 7۴ D4 09 52 61 20 АВ БА 84 26 2А 10 AE 05 86 :14 
Try 2780 മമ മമ മമ OO മമ OO മമ മമ മമ മമ മമ മമ മമ മമ മമ മമ :00 || 2C9@ മദ 54 02 7D ра Q9 EC А! ED CA EC 2E ED CY 40 00 :E6 
5% 2790 മമ の の മമ の の の の മമ മമ മമ OO മമ の の മമ മമ മമ മമ の の : の の || 2CA@ ЕС АВ 1E ED C9 80 മമ 33 СВ 50 ФА E4 26 ЕВ 7F D4 :Е2 
E 2740. മമ മമ മമ മമ മമ മമ മമ മമ മമ മമ മമ മമ മമ の の മമ മമ :00 || 2CB の 09 52 61 16 FF 7D 66 84 26 2D 86 10 34 02 7D D4 :ВС 
Mio 2780 മമ の の മമ OO മമ の の മമ の の OO മമ മമ മമ മമ മമ മമ OO :മമ || 2CCO 09 CC മമ 00 ED Ci ED C4 ED C9 SF FE ED C9 40 QQ :1D 
hd 27C0 മമ മമ മമ OO മമ മമ മമ മമ മമ മമ മമ മമ മമ OO മമ OO :00 || 2CDO ED C9 7F FE ED C? 80 മമ 33 CB 4E 6A E4 26 ES 7F 8A 
na 2700 മമ മമ മമ മമ മമ മമ OO മമ മമ മമ മമ മമ മമ മമ മമ മമ :00 || 2CEO D4 09 32 61 16 FF 4С 6A B4 26 25 Bb 08 34 02 7D :49 
C 27E の മമ മമ മമ OO മമ OO മമ മമ മമ മമ മമ മമ മമ മമ EG QQ :EB || 2CFÜ D4 ØF СС 00 മമ ED C4 ED C9 40 00 ED C? 80 00 33 :B9 
53 ҮР B4 8 ER RS DB S S 00:07 CE A0 S R. TU 07 174 || ടട 
| ----- 人 бит 69 B2 DB 81 CC F8 19 15 9F CA 2F 72 35 DF 5С 14 :D7 


ЖД, 28в0 മമ QQ 00 OO മമ の の OO OO മമ OO OO മമ മമ の の മമ QQ : の 9 の 2DCO മമ മമ മമ മമ QQ ОҒ FO 00 00 7F FE 00 QQ FF FF QQ :7A 

672 28C0 40 の の മമ の の മമ മമ во മമ OO の の OO 01 OO മമ മമ മമ :С1 2DDO 01 FF FF 80 02 F3 CF CO 02 El 87 CO の 3 El 87 CO :ұ5А 

E 28DO മമ OO ടമ മമ മമ മമ മമ OO OO OO OO മമ മാ മമ മാ QQ :84 2DEO 05 ЕЗ CF CO 01 FF FF 80 01 FF FF 80 00 FF FF 00 :81 | 
бс 28EØ 00 മമ 14 40 OO 02 OO OO АЗ ദമ の 2 の 1 aQ മമ 15 50 :26 2DFO 01 EO 07 ദമ 05 F8 IF CO 07 FF FF EO iF FF FF ЕВ :3C | 
Kr 28F0 01 മദ A2 മമ മമ QA АА AA മമ の の OO OO OO OO OO മമ :QB || --------------------------------------------------------- 

РА” Ж --------------------------------------------------------- Sum 56 E4 B7 F9 EA 17 4C 6C 21 10 10 ҒӘ 96 65 AB മം :88 

% Sum BO 67 95 Fi 76 F2 00 ടം 59 SD 81 А7 90 Q3 1A DO :B7 

К? d Add +Ø +1 +2 +3 +4 +5 жб +7 +B +9 +A +B +C +D +E +F Sum 
жа, Add +0 +1 +2 +5 +4 +5 +6 +7 +8 +9 +A +B «C +D «E +F Sum മമമ 00 07 EO മമ の の ZF FC QQ മമ 7F FE 00 QQ 7F FE QQ :16 

No 2900 FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF :FØ 2Е10 00 FF FF മമ QQ Fš CF മമ OO El 87 00 00 El 87 00 :90 


ері, 2АС@ മമ の の OC の の 00 OO OF QQ OO മമ ОҒ CO SF FF FF ҒО :17 2FDO Ø മമ の の മമ の の OO OO OO മമ മമ OO OO മമ OO മമ മമ : の の 
Ж, 2aDO SF FF FF ЕС SF FF FF FO の の മമ QF CO മമ മമ ОҒ QQ : 44 FE の മമ の の മമ OO OO മമ മമ മമ OO മമ OO OO OO മമ മമ മമ :00 
жн 2AEØ മമ の の OC の の の の の の の の の の の の OO OO മമ OO OO OO OO :0с 2Ғға മമ の の മമ മമ の の の の OO OO の の の の OO OO OO മമ മമ മമ :00 
Ke で RF の മര QQ の の の の の の മമ മമ മമ 00 CO മമ മമ 05 FO മമ മമ :B3 || --------------------------------------------------------- 
Nus yup Pe eui quit m യത i m que ا‎ Pm — t tus dun t i uti iti کے‎ we ds i o m എ തായും бит OB DE ØS 20 QD FE 7D 60 09 FE 7D 40 09 70 CB EQ :DE 
"PL Sum 42 OE E4 7А ЗЕ SA АВ ҒО 05 05 EB ЗЕ АҒ 3D D4 70 :DF 

баз | ! Add +0 +1 +2 +5 +4 +5 +6 +7 +8 +9 +A +B +C +D +E +F Sum 
が 2 1506] ^dg %0 жі +2 +5 +4 +5 *6 +7 +8 +9 +A +B +С +D +E +F Sum 5000 00 の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の : の の 
ER | A s ; 
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ハー イノ 2 回 目 登場 の あ へ , BN, あぷ ペー で 
ONO ക്‌ そし て , 
i [5` を 押し 続 


TF. കിം, PC-6001 に つい て ちょ っ と へ ん な こと が あり まし た の で . mr и РИ 
сомѕоц,о,о RET]: し t D1ACONSOLE,, 1, MU ыг. арла 2 
ション キ ー 表 示 ま で スク ロ KA Eo )-BA 
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埼玉 県 ЖА 千葉 県 MAKO 


SD の の SF Сі DC 26 ØA 33 41 ЕС Е4 44 56 ЕЗ El 20 EC 35 :ОҒ 
5р10 06 C3 മമ Qi ED 28 8D 59 ED 2A CC മ 00 55 01 26 :05 
5р20 OD Ab 8D 02 2F 8B 08 SF 17 FE EE СС 00 00 ED АВ :C7 
SDZ@ 10 А7 АВ 12 СС മമ 01 ED АВ 14 EF А4 ЕС АВ 16 16 :3A 
5040 FE 94 ІҒ 01 CC ра CO 34 മം CC の の 01 24 の 6 86 10 :E9 
5050 24 02 AC 61 22 ØA ЕС 61 34 10 AZ El ED 61 «С 64 : АЗ 
5060 68 64 69 63 59 62 69 61 GA E4 26 Eb EC 63 32 65 6P 
5070 “59 34 02 Ab 25 SD IF 01 55 02 Её 23 5р 34 10 EB :41 
SD8@ Ей 89 00 44 56 66 E4 44 56 66 E4 44 56 66 E4 44 :59 
5090 56 66 Е4 1F 98 25 04 39 81 BØ 24 28 81 80 27 ОҒ :7D 
っ DA の 81 84 27 12 81 88 27 15 6 CO А7 2F 16 FF 12 Аё :8C 
SDBO CO А7 2C 16 FF ØB Аё CO А7 2D 16 ҒҒ 04 Ab СО А7 :13 
SDCO 2Е 16 FE FD 81 CO 24 07 80 BO А7 26 16 FE F2 81 :2F 
SDDO DØ 24 07 80 CO А7 25 16 FE EZ 26 07 Ab CO 67 24 :60 
SDEO 16 FE DE 81 D4 26 07 A6 CØ А7 23 16 FE D3 81 D8 :E4 
SDFO 26 07 Ab CO А7 22 16 FE СВ 81 DC 10 27 FE C2 81 :0р . 
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аВ-І BASIC コ ン バ イ ラ 


ШУ 来 夢 


以前 PiO に 掲載 され た MZ-1200 - 80K/C 
用 ゲー ム の “TURBO2 ” ЖХ 1 に 移植 し 
まし た . アル ゴリ ズム は ほぼ 同じ で す が , 
キャ ラク タ や サウ ンド な ど は 強化 し て あり 
ます . に 
画 プ ログ ラム ・ イ ン フ ォ メ ーション 


単純 な 移植 に し て は , わ り と ま と ま 
っ た 仕上 が り に な っ て いま すね . (0) 


まず dB-IBWIC イン ター プリ タ を 起動 し . 
リス ト を よく 見 て 間違い の な いよ うに 入力 し 
ます . そし て 入力 が 終わ っ だ ら テ ー ジ "に セ 
SALTER SV 

次 に dB-IBASIC コ ン バ パイ ラ を 起動 し 

TAPE LOAD Y 


ОВ.) АОВ. 4000 
PORT SAVE Ү 
WORK ADR. COOO 


LINE TABLE М 

と し て コン バイ ル し ます .。 そし て 無事 コン 
パイ ル が 終了 し た ら , 110111മഥ 2 バイ 
F 2&Н00, 1140 に 修正 し て , &H00002* 
ら エ ンド ・ ア ドレ ス ま で を オー ト ・ ス ター ト 


രാമമയം: TURBO 2 ソー ス ・ リ スト 


17 +t TURBO 2 for X1 жие 
5 CLRsMIDTHB の iCLS4: CSIZE2: LOCATE 14,21:Р 
RINT4O," Just a moment , please.":CSIZEO 
10 CLICK OFF:HS=Q:DIM WC (20) :GOSUB 60160 
: GOSUB 40000 
20 АҒ-%НЕЕ00:А-44: АКС-2: AKS=18: EA=8: EB=4 
の : = マス の : AKzQ:EI-1:MC-0: C8-0: EC=Q: EE-O 
30 DB-0:DN-1:DE-1:EH-22:8C-0: 5 に = の 』 CA=3: JX 
=1: AM=Q: PCG= の : 6050850000 
40 II-0:GK-200 
50 505085000: TEMPO:S10:PLAY"V1505:V1504": 
FOR I=ØTO3:LOCATE 16,I:PRINT"XU":NEXT:LO 
CATE 35,4: PRINT "Saw 7Ox9t":WAIT12000 
60 LOCATE 16,0:PRINT"| =" 

: PLAY"BSR9: BS5R9" 
70 LOCATE 16,1:PRINT"| 2": LOCATE 16,0: PRI 
NT"«X/":PLAY"BSR9:B5R9" 
80 LOCATE 16,2:PRINT"| 2":LOCATE 16,1:РКІ 
NT"3U":PLAY"BSR9: BSR9" 
90 LOCATE 16,3:PRINT"42":LOCATE 16,2:PRI 
NT"xU":PLAY"*B9RS5: *B9RS" 
95 BOX(16,0)-(17,3)," ":Е=0:1 ОСАТЕ 25,4: 
PRINT" "1TIME-Q 
.100 B=STICK (ST) : CS= の 』 IF В=@ THEN AB=Q: GO 
SUB 170 
110 IF B-1 OR B-4 OR B-7 THEN АВ=(АК>=2) 


# 


"180 


NU PU EUIS TRU FATE 
oM Ие n 


7TZFvzt*&H000tLCt7—7u:-7P7 
?КФ%ж-7Т7( (57750, 次 回 か ら は 
IPL か ら こ の テー ジ bun ド す れ ば ゲー ム 
DTS 5% 


B 


自 車 の マン ドロ ー ル は . キー ボー ド か ジ 
ョ イス ティ ッ ク で 行ない ,。 [2] キー が プレー 
%, [8] キー が アク モル で ,。 ハン ドル は [4| 
p PE. D Qd di 

まだ , [SPACE キー ( ゾ ジョイスティック 
を 使用 し て いる と き は トリ が ガ が ・ ボ タン ) を 


押す と ギア ・ チ ェ ン ジ が で き 。 HIGH の と 
х ГОМ, LOW の と き は HIGH の ギア 
に な り ま す . 


そし て ゲー ム は , TIME が 0 に な っ た 時 
京 で 決ま っ た 数 の 車 ( 右 上 に LEFT と Kn) 
を 抜い て いれ ば ば, ボー ナス と スペ ア 車 (?) 


エン ジン 全開 . ノ ブッ チキ ギ セ レー 


4 ЖАҢ SPEED ലനാ... 


: CS=-1: GUSUB 170 

120 IF B-3 ОК B=6 OR B=? THEN AB=-(AK>=2 
) : CS=1 :GOSUB 170 

130 IF STRIG(ST)=-1 AND AKC-2 AND 75-0 T 
HEN АК5=50: АКС=1: ҒОК I-0TO7:0UT &H2056-4I 
,&H27:0UT &H2006*1,5H21:NEXT: TS=1: IF AK» 
AKS THEN AK=AKS 

140 IF STRIG(ST)=-1 AND AKC-1 AND TS-Q T 
HEN АКбз18:АКС-2:ҒОК IzQTO7:0UT &H2056-*I 
,H21: OUT &H2066*1,5H27: NEXT: T8721: IF AK> 
AKS THEN AK=AKS 

145 IF STRIG(ST)-0 THEN Т5-0 

150 IF B-7 OR B=8 ОК B=? THEN GOSUB182:G 


OSUB 230 
160 IF B-1 ОК B=2 OR B=3 THEN GOSUB182:4 
K-AK-2:1F AK<@ THEN AK-Q 


165 
170 
175 
176 


АВ-0:650Т70 500 

ON EI GOTO 180,180,175 

АМ-АМ%1:ІҒ АМ>2 THEN AM-0:GOTO 180 
GOTO 185 

A=A+AR 

AA=AF +A 


182 | 
FOR АС=@ТО9:РОКЕ AA*AC-5,&H56C*CS*2^44 


185 
C*16 
190 FOKE AA*AC*75,5H6D*CS*2«*AC*16: NEXT 

192 IF AB-1 THEN POKE АА-6,22:РОКЕ AA+7 


š: 
ti E ёс v 


31% Қ” [ P 


ol x TONS k: Ё а WE, 
жен a — PME d duds " dude 


が 加算 きれ て 次 の ステ ー ジ に 移り ます 。 

し か し , 決ま っ た 数 の 車 が 抜け な か っ た 
b, 自 車 が すべ て な く な る と ゲー ム ・ オ ォ オー 
な ます. 


マー に 


3D нін 2 ът し 変わ っ た で らい で 
あと は ハー ド に 関す る グレ ー ド アッ プ で す . 

それ か ら ゲ ー ム の 難易 度 は か な り 低 くし 
て あり ます が 。 その か わり 1 面 ご と に 地面 
の 色 が 少し ずつ 変わ っ て いき ます .「 次 は 何 
色 か な ? 」 と 楽し ん で くだ さい . 


ء4 = 


ചയയ 7 1014 opo: 
物 が 多い の で す が 。 雑誌 に 投稿 され る 物 に 
は いま いち パッ と ўз も の が 少な いよ うに 
思い ます (実は これ も その 中 の ひと つ だ っ 


だ り し て …)。 TI/O の アン ケー ト で は PC- 
8001 に 次 いで 5 番目 に ユー ザー が 多い の で 
TSA, PC ご と き に 負け ず 頑 張り ま 
Lx. 

ФЕ $ed # 

PEH ЖЖІ: "TURBO 27, PiO 3 + 


4,32 
194 IF AB=-1 THEN POKE АА+5, 22: РОКЕ АА+8 
5,22 
200 ON JX GOTO 205,220 
205 IF А<1@ OR А>7@ GOTO 3000 
210 ІҒ(А<14 OR A»66)AND АК>@ THEN AKzAK- 
1: SOUND 6,8: SOUND7 , 40: SDUND 1 മ, 16: SOUND11 
3196: SOUND12,7: SOUND13,1 
220 RETURN 
230 ON AKC GOTO 240,270 
240 IF АК>12 THEN АК=АК+1:1Е AK>AKS THEN 
AK=AKS : RETURN 
250 АН=АН+1:ІҒ AH>7 THEN AK=AK+1 з QH= の 
RETURN 
АК-АК%2:ІҒ QK>AKS THEN AK=AKS 


IF АК<2 GOTO 580 
SC=SC+1:CSIZE2: LOCATE 78-LEN (STRS (S 


C))*2,1:PRINT #@,5С 
505 IF SC>HS THEN HS=SC 

507 LOCATE 7B-LEN(STR$(HS) ) *2,0: PRINT # 
Q,HS:CSIZEQ 

510 ON EH GOTO 520,570,540 

520 IF EE>=EA THEN EE*EA:EH-3 

550 ЕЕ=ЕЕ+1:60Т0 550 ` 
540 ЕС=ЕС+1:ІҒ ЕС>ЕВ THEN ЕЕ-ЕЕ-1:ІҒ EE< 


^e. 


“Хғ ЧУ» M АР” XS ЖҰҒУ % ^T ж. On Y rre VA "C. NN Te W а с Д. D =E 7) < T: y "^o Dite m v" NEF ee M: ٤ ) % 2: ” Т“ Қал Атты റ്‌; UY № ыз дА 
* MR cS КУЛЕ Зь Set p А - M-A Ae で (7-2. BAIT Ua А 526657, Say + А y” i5 Ry! 5 C MEA: 1 i ` Ei х ELI f റ്‌ 1 ГА, A ര്‌ Ларг b HEX š x Ñ: ГАМ УАЙ 
PN (ow 1 Т š ç š Р A Г ; 4 Er « 4 » Ó RE М 4 y に | қ 
| PORR Ге; | У | i. S i^v AME e 

| | PO | に ү d 
| P av A 
4 TURBO2 ソ ー ス ・ リ スト fa 


-0 GOSUB 700 
550 DB-EE 
560 EF-EE/Z*AK/B:EG-EG-1:IF 6-Еб<-ЕҒ THE 
N AB-DE: EG-0: GOSUB180 

565 GOTO 580 

570 DB=@:EC=EC+i:IF ЕС>ЕВ GOSUB 700 

580 GOSUB 2000: GOSUE 1000: GOSUE 800: GOSU 
B 2500 i 
590 SOUNDO,178: SOUND1 , 6: SOUND2 , 176: SOUND 
3,61 SDUND4 , 174: SOUNDS , 6: SOUNDS, GK/10+7:5 
OUND7 , 40: SOUNDS , 16: SOUNDS , 16: SDUND 1 の 。 16: 
SOUND 1 1 , 100-AK%2: 5О0Мр12,0:500М012,12 
600 Е-Е-(АК>0):ІҒ E<=GK GOTO 100 

605 E=1』E1=RND (3)+1』 IF EI-3 GOTO 620 


` \ , | 
T | j C 

5410 J=3:FOR I-QOTO159:J-J*RND(C3) ~1: ゴ = ニ ゴー( 

J<1)+(J>6) :POKEKHFOSQO-*I,&H65*J*16:NEXT:I 

= の 

5420 J=J+RND (3) 1 』 ゴ = ゴー(J< く 1)+(J>6) :POKE&H 

Ғй050%1,%Н65%2%16 

5430 IF FEEK(&HFg51+1) く >&H65+J*16 THEN I 

-I*1:GOTO 5420 

5440 ' 

5450 

5460 FOR І-070159:РОКЕ &HFØFØ+I , PEEK (&HF 

050-1):МЕХТ 

5470 FOR І-0Т027:РОКЕ &HEFEg+ 1 。 の : NEXT 

5480 FOKE &HEFE4,&HOF:POKE &HEFE5 , НЕ: Р 


2550 FOR I=16TOSSTEP-1 : SOUNDS, І: SOUND?, 0 
: SUUND19。 の : WAITZQO:NEXT 

2540 CONSOLEQ, 5: CLS: FOUR I-OTO4:LOCATE1,I 
: PRINT " RRRRRRRARRERRRRE" ; : NEXT 

2545 PALET1,2:PALET4,2: PALETS,Q0:PALET7,6 
: CSIZE2 

2550 COLOR4: LOCATE 24,1:PRINTWO,"STAGE " 
,;PCG;" CLEAR >" 

2560 COLOR6:LOCATE 20, 3:PRINT#Q, "BONUS : 
20 < @ = "j 

2570 TEMF'OB@@:FOR I=1TOSK: LOCATE 46,3:FR 
INT#@,1;:LOCATE 56,5:РКІМТЕй,Іж20;:РІ АҮ" 
V1306C1C1C1R3: V1406R1E1E1RS: V1SOG6RIRIGIR 
3": SC=SC+20: NEXT: МА172000: COLOR7: CST 2Е0: 


/ 


610 FALET 5,0: GK=150+RND (70) :GOTO 100 CONSOLE ОКЕ &HEFE6,&HOF:POKES&HEFEC 。&H 1 : POKE&HEF Y. 
620 FALET 5,5:GK-50«RND(70) :GOTO 100 2580 SK=SK-S: S=S+3: CA=CA+ : GOSUB 50000 ED,*HQ1:POKE &HEFEE , 10% - 
700 EA=RND (4) +4: EB=RND (30) *1:DE-RND(2):1 || 2590 MZ-1:GOSUB 5520:PALET:PALETS,Q 5490 POKE &HEFFQ,14:POKE &HEFF1,58:POKE p. 
Е DE=Q THEN DE=-1 2592 SOUNDO , 178: SOUND1 , 6: SHUND2 。 1761 SOUN &HEFF2,28:POKE &HEFFZ,40:POKE &HEFFA,*HQO Е" 
710 EH=RND (2) +1: ЕЕ=0: ЕС=0: RETURN D3,6: SOUND4 , 174: SOUNDS , 6: SUUND6 , GK/10*7: 1:POKE &HEFFS, &H01:POKE &HEFF 6, &H02: POKE р 
800 KG-AK:IF KG<20 GOTO 830 SDUND7 , 40: SOUNDS , 4: SOUNDS , 4: SDUND 1 の , 4: 50 を HEFF7 , HOS 
810 FOR KE-OTO19:0UT &HZO064-kE,&H22: NEXT UND 1 1 。 100-AK*2: SOUND12,0: SOUND13,12 5500 ` 
820 FOR KE=20TOKG: OUT &H3064*KE,&H21:NEX || 2595 FOR I=5TO16: SOUNDS , I : SOUND? , I: SOUND 5510 WIDTH8O:CLS4:PALET1,1:PALET 5,0:MZ- 
T:GOTO 840 10, I: WAIT10Q: NEXT: TIME-Q: RETURN @ 3 
| 830 FOR KE-OTOKG: OUT &H3064-KE,&H22:NEXT || 2700 FOR I=16TOQSTEP-1 : SQUNDB, І: SOUND9,0 || 5520 LINE(0,0)-(539,47) ,PSET, 1 , BF А 
840 РОК KE-KG TO 32:0UT &H3064-«KE,MH20:N | | : SOUND10,0: WAITZS@0: NEXT: CONSOLE 0,5:С15: 5550 LINE(0,48)-(529,48) 。PSET 。7 3 
EXT: RETURN CONSOLE:PALET1,0:PALET4,O:LOCATE 31,4:PR || 5540 1 ІМЕ (0,49) – (639,199) ,PSET, S,BF 
1000 ZM=0:PH=1:FOR PK-QOTOS:PI-PEEK(&HEFE || INT" ~. 775524 ')4e*4O£":IF SC>HS THEN HS || 5545 CONSOLE 0,5: CLS: CONSOLE と 
@+РК) : PA=PEEK (&HEFE4+P に ) : PH=—F'H =5С 5550 CSIZE2:LOCATE6,0:PRINTSO, "GEAR" 
1010 РС=РЕЕК (&HEFEB*PK) :PD=PEEK (&HEFEC*P || 2710 CSIZES:COLORA:LOCATE 2,0:PRINT#O,"Y, || 5560 LOCATE 20,0:PRINTWO, "SPEED CHI и 
К):РҮ-РЕЕК (&HEFFØ+FK) OUR SCORE : ";SC 5570 LOCATE S6,0:PRINT4O,"HIGH :" р 
1015 PL-PEEK (&HEFF4+FK ) : PM=PEEK (&НЕРЕВ+Р || 2720 LOCATE 42,0:PRINT#O, "HIGH SCORE : " 5580 LOCATE 56,1:РКІМТЊӘ, "SCORE: " ; 
K) 145: CSIZE2 5590 LOCATE 56,2:PRINT4Q,"TIME :" с t 
1020 IF Ак<5 GOTO 1300 2730 IF SC=HS THEN COLORé:LOCATE 16,2:PR || 5600 LOCATE S6,3:PRINTWO,"LEFT :" だ 
1025 PL-PL*1:1F ലാല THEN PL=@: GOTO 103 | | INT&Q,"YOUR SCORE IS HIGHEST >" 5610 С517Е0:1 ІМЕ (48,8) – (111,235) ,РЅЕТ,0,В ust 
2 2740 CSIZEQ: COLOR7: TEMPO350: SOUND 7,&H3F Yd 
1027 GOSUB 1200: GOTO 1022 2750 PLAY"V1405 C7WESDA4R1D4R1F5G7R1G7474 || S620 COLOR (2-AKC)*6*1:LOCATE 6, 1: PRINT" E 
1030 PI-PI*1:IF (15-РІ)<(Ак/2) THEN Р1=@ || B9:V1506 C74ESDARIDARi1FSG7R1G7A74B9:V120 || *vai?n-3" Op 
:FZ=1:GOSUB 1050:50Т0 1052 3 CSRSWEZSRZD4D1D4D1F3R3G761G7A798B9" 5630 COLOR (AKC-1)*6*1:LOCATE 6,2:PRINT" 
1052 MZ=1:GOSUE 1055 2760 WAIT 5000 പട. 
1055 РОКЕ%НЕЕЕ@+РК,Р1:РОКЕ&НЕЕЕ4+РК ‚РА 2770 GOTO 20 $640 COLOR7: GUSUBB の の Yo 
1055 FURE&HEFEB+FK , PC: PUKE&HEFEC+PK ,PD:P || 5000 JX=2:AK=Ø:FOR JD=1TO20: АВ=0: CS=RND ( $650 LOCATE 19,2:РКІМТ"%%,,,,,.,,Х%%%,,,, PE 
DKE&HEFF の +FK , PY 3)-1 ha oe ТЕГУУ 2 95, | 
1027 POKESHEFF 4+PK , PL: PDKE&HEFFB+PK , FM 2010 GOSUE 2000:GOSUB 180:GOSUB 1000 5660 LINE(40,4)-(120,28) ,PSET,4,B:LINE (4 í us 
1040 NEXT::IF ZM-1 GOTO 3000 | 3020 SOUNDS , 31-RND (20) : SOUND7 , 7: SOUNDS, 1 8,4)-(116,4) ,PSET,1 oT 
1045 RETURN 6: SOUND? , 16: SOUND10, 16: SOUND11,244: SOUND || 5670 LINE(152,4)-(424,28) ,PSET, A,B:LINE( қ 
1050 РА=РА+Р2: М2=0 12, 15: SOUND13, 1: NEXT: WAIT7O0 160,4)-(336,4) 。FSET 。 1 
1055 IF PA>12 НЕМ PBztH&4:PP-9:G0TO 110 || 3030 CA=CA- 1:MZ-1:GOSUB 5755: IF СА<0 GOT 5680 LINE (8,0) -(23, 39) 。PSET 。 の 。BF 
മ О 2702 5690 FOR 152704: ОСАТЕ 1,1:РЕ1МТ"_—";:МЕ 
1060 IF РА>В THEN PBz&H63:PP-7:GOTO 1100 || 3040 1х-1:А-29 XT 
1070 IF РА>4 THEN PB=&H62』PP=5』 GOTO 1100 || 3050 FOR 1=@ТО15@@:РОКЕ &НЕ9@@+1,&НЕ5:МЕ || 5700 CSIZE2 
1080 IF PA>2 THEN PB=&H61 』 FFP= さ 』 GOTO 1100 || хт 5710 LOCATE 78-LEN(STR$(HS)) *2,0: PRINT # 
1090 PP-1:PB-&tH60:GOTO 1110 2050 GOSUB 2010:GOSUB 180:GOSUB 1000: CAL || Ø,HS NE 
1100 IF М2=0 THEN РС=РС+1:1Ғ PC>=PD THEN || 1 &НЕ@12 5720 LOCATE 78-LEN(STR$(SC))*2,1:PRINT # > 
РС=@:РҮ=РҮ+РН#Р7+#2 3070 COLOR (2-AKC)*6*1:LOCATE 6,1:PRINT" 2,5С б 
1110 IF PA>18 GOTO 1160 fva?n-3" 5730 LOCATE 74 ,2:PRINT & М 
1120 PJ=&HE95 の +PAB の +PY-MC (PA) 3080 COLOR (АКС-1)ж6%1:1 ОСАТЕ ж 2:РКІМТ" || о, "90" 
1140 FOR РЕ=@ TO РР “Т 7 +59" . 5740 LOCATE 76-LEN(STR$(S-SK) ) #2, S1 PRINT 
1150 POKE PJ+PF-PP/2,PB+PF#16:NEXT 2090 COLOR7:RETURN #0," ";5-5К У. 
1160 ІҒ РА>14 БОТО 1200 5000 ' TITLE 5750 CSIZEO ХАМ 
1170 RETURN 5010 WIDTH4Q:CLS4: CSIZE3: РА ЕТ 5755 IF СА<5 THEN LOCATE 1,4: РКІМТ "ий" ; A 
1200 IF JX=2 THEN RETURN 5020 LINE (20,0) -(299,199) ,PSET,1,B 5760 IF СА<4 THEN LOCATE 1,5: РКІМТ "ий" ; D 
1205 PO0=tHE950+8@*PA+PY-4:FOR PE-QOTOS:FO || 5025 LINE(22,2)- (297,197) ,PSET,1,B 5765 IF СА<5 THEN LOCATE 1,23PRINT "а" ; 
R Рм-0Т09 5050 CGEN1 : COLOR2 5770 IF СА<2 THEN LOCATE 1,1: PRINT" НИ"; £T 
1210 IF (РО+РЕ=АА-5+РМ) OR (FQ+FE=AA+PN+ || 5040 COLOR4: LOCATE 4,2:PRINT#0,"======== || 5775 IF CA<1 THEN LOCATE 1,0:PRINT "аиа"; › 
75) ТНЕМ ZM=1 ニニ ニニ ニニ ニニ " 5780 IF М2-0 THEN GOSUB 29010:GOSUB 182:6 W 
122@ NEXT:NEXT 5@5@ COLOR2:LOCATE 4,4:PRINT#0," TUR OSUE 1 の の 9:』CALL&HF の 12 さか 
1240 IF PA>2 の GOTO 1260 BO 2 " 5790 RETURN ° v 
1250 RETURN 5060 COLOR4: LOCATE 4,6:PRINT#0,"======== || 40000 ' WAY DATA SET M. 
1260 FA=0: PY=39:PD=RND (5) :PM=RND (3) +1: SK || ========" 40010 COLORO:FOR I-OTOS:LOCATE 0,0 (は 
=S ド + 1 : RETURN 5070 CSIZE2:COLOR2:LOCATE 8,1:PRINTWQ,"- | | 42020 ON 1+1 GOSUB 41000,42000, 43000 , 440 
1300 IF РА<=@ THEN POKE &НЕ95@+8@#РА+РҮ- || X1 VERSION=" ге 
ЫС(0),22:РА-0:РҮ-39:650Т70 1033 5075 CSIZEQ: COLORS: LOCATE 5,9:PRINT"HOW 40030 FOR Y=Ø TO 19:FOR Х-0Т039 
1310 FZ=-1: GUSUE195 の 』 GOTO 1033 TO CONTROL" 40040 FOKE &HD の の の + 1 x 16 の の +YxB の +X , INF (tHZQ i3 
2000 IF AK<2 GOTO 2030 5080 LOCATE മ, 11: COLORS @@+Ү+в@+Хх›) w V° 
2010 11=11+1 5090 PRINT" ТЕМ КЕҮ SPACE 40050 POKE &HDO4F+Tx16 の の +YxB の ーX 。 INP പമ 
2020 IF ІІ-4 THEN II-Q "s PRINT: COLOR7 QO-Y«8Q^X) 
20:0 CALL&HF の 12 5100 PRINT" SPEED UP GEAR CHAN || 42060 NEXT:NEXT x 
2040 IF АК<2 GOTO 2100 40272 FOR Үз17019:Х-РЕЕК(%Н0028%1ж1600%Ү А 
2050 IF DB>5 THEN MC=MC-DE* さ :』 GOTO 2080 5110 PRINT" х a4 *BO*Y*2):IF X=32 GOTO 40090 ‹ 
2060 IF DB>3 THEN MC=MC-DE*2:GOTO 2080 5120 PRINT" LEFT 4 a RIGHT" 40080 FOKE &HD の 2B+Ix16 の の +Y 日 2 X-16: РОКЕ eN 
2070 IF ОВ>@ THEN MC=MC-DE :GOTO 2080 5130 PRINT" * " &HDO29«*I*1600*Y«*82,X に お 
2080 IF MC く < の THEN MC=MC+16 の 5140 PRINT" SPEED DOWN " 40090 NEXT | d. 
2090 IF МС>159 THEN MC=MC-160 5150 COLORS:LOCATE 23,16:PRINT"YOU CAN U || 40100 NEXT: COLOR7 53 
2100 POKM&HF の 97 ‚,&НЕ9@@:РОКЫ%НЕ@@А , を HF の 5 の | 40110 ' ED 
+MCiCALLSHF の の の 5155 LOCATE 23,17:PRINT" JOY STIC || 40120 MEM &HF の の 9 。&HC5 , &HD5 , &HE5 。&H91 , &H5 ч, 
2200 CC-0:DA-*HDOSQ*160Q*II:DY-tHE95Q: IF U മ മമ , 0:11 , KHOD , HOO , 84121 , HOO , HOO , НЕ СЕТИ 
DB<=Z THEN DK=DB:GOTO 2220 5160 COLOR4: LOCATE 5,19:PRINT"EXTRA CAR D, HBO, &HE1 ,&HD1 ,SHC1 , HCY /% 
2210 FOR ഉടമ TO DB-3:DC-(DB*2-2-(D*2))*2 || FOR EVERY 1 STAGES" 40150 MEM &HF912。&HFS 。&HC5 ,&HD5 , SHES 。&H1 (422 
: GOSUB 2300: WC (CC) :DC*DE: CC=CC+ 1 5170 COLORé:LOCATE 5,21:PRINT"PUSH SPACE || 1 。&H49。&H の 6 , &HO1,&H90, &H31,9H21, HOO, &HE 4 
2220 DA=DA+8Q: DY=DY+8Q: NEXT: DK =3 BUTTON TO START >" 9, 0:76 。&HED , &H79 , &HØZ , XH23 , НІВ, KH7A, &HB T 
2220 FOR ഉടമ TO DK: DC= (DK-D) #2: 5605082500 || 5180 COLOR1:LOCATE 4,23:PRINT"COPYRIGHTE 3, &H20, HFS. &HE 1 , &HD1 。&HC1 。&HF 1 , &HC9 
: DA=DA+8Ø: DY=DY +80: WC (CC) =DC*DE: СС=СС+1 : _ 1984 BY " 40140 RETURN | iN 
NEXT 5190 COLOR7:LOCATE 14,23:PRINT"/" 41000 PRINT" NIIN US 
2240 FOR ഉടമ TO 17-DB:DC-0:GOSUB2300: DA= || 5200 COLORI:CSIZE2:LOCATE 26,27:PRINTS 0, || uite E 
DA*80: DY=DY+80: WC (CC) =Ø: CC=CC+1: NEXT "PIO" 41010 നാശ 
2250 RETURN 5210 COLOR7:CSIZEO KUARA 
2300 FOKW&HFØØ7 , DY :POKWŁHFØØA , Dà* (DC*DE ) 5220 SOUNDS , മഃ SOUND7 , &HA7: SOUNDS , 16: SOUN || 41020 നവാ 
: CALL&HF の の: RETURN 09,16:500М010,16:500М011,10:500М012,200: || ”'BBB iy в ў 
2500 IF ТІМЕ>90 GOTO 2520 \ SOUND137, 1 41030 ണാ و‎ 
2505 IF ТІМЕ-90 THEN I=@;CSIZE2:LOCATE 7 || 5300 ' BB | | 
&6-LEN(STR$(ID *2,2:PRINT #0," ";I:GOTO 2 || 5510 IF STRIG( の ) =-1 THEN ST-0:GOTOS400 41040 ааа“ 3 
512 5315 IF STRIG(1)=-1 THEN 5Т-1:060705400 y 
2510 СБІЈЕ2:1 ОСАТЕ 76-(ЕМ(5ТБ%(90-ТІМЕ)) 5520 IF STRIG(2)--1 THEN 6Т-2:50705400 41050 PRINT" ЖЖЖИНИ ДНИ дй e EUR EUR t 
*2,2:PRINT #0," ";9Q-TIME 5550 CSIZE2:COLOR RND (4) +4: LOCATE 8,1:PR " ; * 
2512 1-5- -SK:IF 1<0 THEN 1-0 INT4Q,"-X1 VERSION-" (481060 РБКІМТООММОННЫ ДИН НЫНЫ 97 YU 
2515 LOCATE 76-LEN(STR$(ID)*2,3:1PRINT #0 || 5340 PALET1 。RND (3) м 5 
í," "PI:CSIZEQ: RETURN S350 CSIZEQO:COLOR7:GOTO 5210 41070 PRINT" ЖИШШ И: ВНЫН 27 қағы» 
2520 IF 5к<5 GOTO 2700 5400 FOR I=QTO1600: POKE&HE9 の の + 1 , HFS: NEX p ざい 


p^ š 


Ял "UT 


“ £ 


41090 PRINT" dao 
41100 PRINT" XIAN: IAA 
41110 നാശ 
41120 PRINT'JXX*XXHBBHBBB /% 
41130 PRINT"XXBBHBBBBH ノル 
41140 PRINT"BBBBBBBB ノル 

41150 PRINT" BBBBBB "4 


41160 PRINT" ARAB 


41170 PRINT" AA 


41180 PRINT" 


“ 


41190 PRINT" 


41200 RETURN | 
42008 PRINT" NININ 
വായ 
42010 PRINT" Jte desk 
വദ iy ^" 
42020 PRINT" Judo eed 
XARA 4 
42030 നവാ 


ണാ 

മേധാ 

ണാ 
ഭാ 97 

സാവാ 97 

本 97 

PRINT "RAR 

ദനാ 

PRINT IRIS 

PRINT" ххянияндян 

PRINT"BBBHBBBB ノル 

PRINT"BBBBBB "8 

PRINT" BBB "4 

PRINT"BB "4 

PRINT" 


PRINT" 


RETURN 
ധാ 
യ 
43010 ബനധ 
വദ iy " 
ധനവാ 
ധാമ 
PRINT വാദ 
ഭേധസധാാധഡാാാാാഭദദദദ 
ട്ടില്ല 
ട്ടില്ല 
ധനവാ 
PRINT" ХАХАХАХ 27 
PRINT" ЖАИЗ ХВНВВВЕВ “L 
PRINT" ХЕК ХНЕВВЕВВ 7b 
നാശ 
PRINT" ххяядяяяяя 
PRINT "ARRAN 


" 


PRINT" ARAARA 


FRINT"BBBB “൭ 
PRINT"BB "$ 


PRINT" *4 

PRINT" $ 

` RETURN 

PRINT" SSN 


て を を アデ 


ぁ 僕 は バビ コ ニ ス ト で す . 
を 2 万 円 以下 で 売る の は や め ま し ょ う . 呪 わ れ て 金縛り に あい ます . 
I DSS +, So ВИ А ГА 


ЖАКИ КЭ КЭ КӘК" 


-44010 ണാ 


SNARE 

44020 PRINT" XXX AA AAMAS ааа” 
2899 iy _ " 

44030 നവാ 
ян z 

44040 PRINT" ധാ 


44050 PRINT" ЖЖАЖО КИ К BBBBB 


| ~ 


44060 шарта 25 
44070 PRINT" KK 大 
44080 PRINT AIR EEIIEARANAR 

44090 ദനാ 

44100 ധനവാ ノル 

44110 PRINT" KXXAAAKBBBBBBE ^% 

4412@ PRINT'XXXXXBBEBBBB /% 

44130 PRINT"XBBBBBB ノル 


44140 PRINT" RARREARRBAR 


44150 PRINT"RRRRRR 


44160 PRINT" RRRR 


44170 FRINT" 月 月 


44180 PRINT" “4 


44190 PRINT"" $ 


44200 RETURN | 

50000 ' PCG SET 

50010 PCG-PCG*1:IF PCG»16 THEN PCG=1 
50020 ON PCG GOTO 60010, 60220 , 60030 , 6004 
മ , 60050 , ൭00൭൫ , 0070 , 6൭2080 , 20050 , 62120, മ 
1 1 の 。6 の の の 0 , 62120 ,60130,60140,60150 i 
650000 DEFCHR ま (&HF5 ) =HEXCHRS ( "20000000000 
の の の の の の の の の の の の 9 の 9 の の の 9 の 9 の 9 の AASSAASSAASSAA55" ) : 
RETURN 

60010 DEFCHR$ (&HFS) -HEXCHR$ ("の OO の の 0 の の の の の 
の の の の の の の の の の の の の の の の 9 の の の の FFFFFFFFFFFFFFFF") : 
RETURN 

60020 DEFCHRS (&HF5) =НЕХСНЕ% ( "20002000000 
の の の の の 55AQ55QAAS5AQSSQAFFFFFFFFFFFFFFFF" ) : 
RETURN 

60030 DEFCHRS (&HF5) -HEXCHR$ ( "00000000000 


| 9 の の 9 の FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF") : 


RETURN 
0040 DEFCHR ま (&HF5) =HEXCHRS ("55АА55АА55А 
ASSAAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF"): 
RETURN 
60050 DEFCHR$(&HF5)-HEXCHR$ ("FFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF"): 


"RETURN 


50060 DEFCHR$s(&HF5)-HEXCHR$ ("FFFFFFFFFFF 
FFFFFAASSAASSAASSAASSFFFFFFFFFFFFFFFF") : 
RETURN 
60070 DEFCHR ま (&HF5) =НЕХСНКФ ("FFFFFFFFFFF 
FFFFF の の の の の の の の の の の の の の の の FFFFFFFFFFFFFFFF") : 
RETURN 
50080 DEFCHR$(&HFS)-HEXCHR$ ("FFFFFFFFFFF 
ЕҒЕҒҒООООООООООООООООАА5ЗАА5ЗАА5ЗАА55"): 
RETURN 
50090 DEFCHR ま (を HF5) =HEXCHRS ("S5SAASSAASSA 
55SnR の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の 9 の"): 
RETURN 
62100 DEFCHR*(&HF5) =HE XCHR ま ("の の の の の 9 の の の の の 
の の 0 の の AASSAASSAASSAASSOO の 9 の の の の の 0 の 0 の 9 の 9 ) 4 
RETURN 


(60110 DEFCHR$ ( &HF5) =HE XCHR$ ("AASSAASSAAS 


SAQSSAASSAAS5AASSAA55 の の の の の 99 の の の の 999 の の 9" ) : 
RETURN 

60120 DEFCHR$ (&HF 5) =HEXCHR$ ("AASSAASSAAS 
582550000000020000000АА55АА55АА55АА55" ) : 
RETURN 

60130 DEFCHR$(&HFS) =HEXCHRS ("20020000020 
ee 
RETURN 

60140 шағалы Дала i 
SAASSAASSAASSAASSAASSAASSAASSAASSAASS " ) : 
RETURN 

60150 DEFCHR$ (%HF5) =HEXCHRS ("AASSAASSAAS 
ら nn55 の の の の の の の の の の の の の の の の FFFFFFFFFFFFFFFF" ) : 
RETURN ` 

60160 DEFCHR$(&*H20) =HEXCHRS ("00000000000 
の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の 9 の の の の の") 
60170 DEFCHR$ (&H21) =HEXCHRS ("20000000000 
の の の の の の の の の の の の の の の の の の の の 9 の の の FEFEFEFEFEFEFE"') 
60180 DEFCHRS (&H22) =HEXCHRS ("000020000200 
の の の の の の の FEFEFEFEFEFEFE の の の の の の の の の の の の 9 の の " ) 
60190 DEFCHR$(*tH23)-HEXCHR$ ("21010003050 
606030101000:30506505030101000:06060505") 
60200 DEFCHR$(&H24)-HEXCHR$ ("210100C2506 


`@5@С@@1@1@@С@&@&@&@с@@1@1@@с@&@&@&й@С@" ) 


60210 DEFCHR$(&H25)2HEXCHR$ ("21010003070 
1 の 1 の 7 の 1 の 1 の の の さ の 7 の 1 の 1 の 7 の 1 の 1 の の 9 の さ の 7 の 1 の 1 の 7") 
60220 DEFCHR$(&H26) -HEXCHR$ ("01010083858 
686E301010082868686E:01010083868585E 3") 
60230 DEFCHR$(&H27)-2HEXCHR$ ("01010007000 


この 前 友だち に 「 1 万 円 で 売っ て 」 と バカ に され まし た (相手 は まじ め に いっ て まし か ). 
P.S. PC-6001mkII の こ и ЕУ сг ни pra e 


мка а, 


ет 


ж. 


e 


PM Has 
2” ir "IO 


さ の 6 の 7 の 1 の 1 の の の 7 の の の さ の 6 の 7 の 1 の 1 の の の 7 の の の さ の 697 " ) 
62240 DEFCHRS (&H28) =HEXCHRS (മമ മമ: 
6 の 6E マ の 1 の 1 の の じ さ らら 6 じ 696E さ の 1 の 19 の 9 じ さ 66C6 の 6E さ " ) 
60250 DEFCHRS (&H29) HEXCHR$ ("21010007000 
さ の の の 7 の 1 の 1 の の の 7 の の の さ の の の 7 の 1 の 1 の の の 7 の の の 9 さ の の の 7 " ) 
60260 DEFCHR ま (&H2A ) =HEXCHR ま ("の 1 の 1 の の じ さ 66 ヒビ 
666C35010100C366C666C3010100C 3566C566C3") 
60270 DEFCHR$(&H2B) =HEXCHRS ("210100C 3666 
666C3010100C36666656C3010100C3666666C3") 
60280 DEFCHR$(&H2C) =HEXCHRS ("0190100020000 
の の の の の の 1 の 1 の の の の の の の の の の の の の 1 മ: の の の の の の の の の の の の " ) 
60290 DEFCHRS (&HZD) =HEX じ HR ま ("の の の の の の じ さ 666 
666C3000000C36656566C3000000C3666665C2") 
60300 DEFCHR$(&H2E) =HE X じ ビ HR 生 ("の の の の の の じ の 6 の 6 
の 6 の じ の の の の の の の じ の 6 の 6 の 6 の じ の 9 の の 9 の の の の じ の 6 の 6 の 6 の Cg" ) 
0510 DEFCHR ま (&H2F ) =НЕХСНКФ (" ЗСТЕҒЕҒЕҒҒҒ 
F7ES3SC3C429DB1B19D423C3C429DB1B19D423C") 
60320 DEFCHR$(&H そ の ) =HEXCHRS ("3E636363636 
25Е002Е62656562655Е005Е626562562653Е00") 
60330 DEFCHRS (&H31) =HEXCHRS ("18387818181 
87E001838781818187E001838781818187bE909") 
60340 DEFCHR$(&H32)-HEXCHR$ ("SE63030E386 
07Ғ005Е55030Е58607Ғ002Е65050Е28607Ғ00") 
60350 DEFCHRS പാ «НЕХСНК%("5Е63035Е026 
25Е005Е635055Е056255Е005Е65055Е05655Е00") 
60360 DEFCHRS (&H34) =HEXCHRS ( "@E1ES6667F0@ 
ら 6 の 6 の の の ウ E 1E う さら らら 67F ウ 6 の 6 の の の E 1 E さ 6667F ウ 6 の 6 の " ) 
60370 DEFCHR$ ടോ =HEXCHRS ("7F607C06036 
63C007F 6027C0603643C007F 607C06023663C00" ) 
60380 DEFCHRS (%HSé) SHEXCHRS ( " 1E30607E636 


 33E001E30607E63633E001E30607E63633E00") 


60390 DEFCHR$(&H37) HEXCHR$ ("7F63060C181 
818007F5:050C181818007F 63060C 18181800") 
50400 DEFCHR$s(&H38)-HEXCHR$ ("SEG6:3633E636 
ささ E の の さ E6 う 6 ささ E6 ら さら ささ E の の さ ヒ 6 さら 6 ささ E6 さ 6 ささ E ウ の " ) 
60410 DEFCHR ま (を けさ 9 ) =HE XCHR 和 を ま ( "さら 6 さ 6 さ さ F A30 
63C003E63633F 03063C003E63633F の さゆ 6 さ C の の " ) 
60420 DEFCHR$ (®НЗА) «НЕХСНКФ("001С1С001С1 
CO の 9 の 9 の 91C1C じ の g 1 に 1 じ の の の の の の 1 じ 1C の の 1 じ 1C の の の の" ) 
60430 DEFCHR$ (&HZB) =HEXCHR* ま ("の の の 8 の B さ EgB の 
B の の の の の の の 8 の コロ さ E の BOB の の の の の の 9 の B の B さ E ワ BB の の の の " ) 
60440 DEFCHR$((&HSC) =HEXCHRS ("20221408142 
20200000221408142200000022140814220000" ) 
60450 DEFCHR$(&H3D)-HEXCHR$ ("20007F007FQ ` 
の の の の の の の の の 7F の の 7F の の の の の の の の の の 7F の の 7F の の の の の の " ) 


- 60460 DEFCHR$ (&H3E) -HEXCHR$ ("1C1C1C1C1CO 


@1С@@1С1С1С1С1С@@1С@@1С1С1С1С1С@@1С@@"› 02 
60470 DEFCHR ま (&H マ F ) =HEXCHR$ (" SEG63030E 180 
018002Е65020Е180018005Е650350Е 18001800") 
60480 DEFCHR$ (®Н4@) -HEXCHR$ ("22000000201 
じ 1C の の の の の の の の の の の の 1 じ 1 じ の の の の の の の の 9 の の の の 1 じ 1CO の " ) 
60490 DEFCHRS (&H41) =HEXCHRS ("1C3663637F6 
363001C3663637F6363001C3663637F636300") 
50500 DEFCHR$(&H42) “НЕХСНК%("7Е65657Е636 
37E007E63637E63637E007E63637E63637E00") 
60510 DEFCHR$(&H4i)-HEXCHR$ (" 1E336060603 
31E001E33606060331E001E33606060331E00") 
60520 DEFCHR$(&H44 ) HEXCHR$ ("7C363333333 
67C007C36333333367C007C36333333367C00" ) 
60530 DEFCHRS (&H45) -HEXCHR$ ("7F60607C606 
07F007F60607C60607F007F60607C60607F00") 
60540 DEFCHRS (&H46) =HEXCHRS ("7F60607C606 
の 6 の の の 7F6 の 6 の 97 じ 6 の 6 の 6 の の の 7F6 ら 9697 じ 6 の 6 の 6 の の の " ) 
60550 DEFCHRS (&H47) =HEXCHRS ("1ESS6Q6F6335 
31E001E33606F 63331E001E33606F 63331E00") 
60560 DEFCHR$(&H48)-HEXCHR$ ("6363657F656 
263005263637F63636:006363637F636316300") 
60570 DEFCHR$(&H49) -HEXCHR$ ("3C181818181 
В2С002С18181818182С0025С18181818185С00") 
60580 DEFCHR$ (&H4A) =HEXCHR* ま ("の F の 6 の 96 の 6966 
6 さじ の の の F ウ 6 の 6 の 6 の 96 ら 6 さじ の の の F 06060606663C00" ) 
60590 DEFCHRS (&H4B) HEXCHR$ ("63666C786C6 
6630063666C786C66630061666C786C6663500") 
60600 DEFCHRS (&H4C) =HEXCHRS ("560606060605 
の 7F の の 6 の 6 の 6 の 6 の 6 の 6 の 7F の の 6 の 6 の 6 の 6 の 6 の 6 の 7F の の " ) 
60610 DEFCHR$(&H4D) 2HEXCHR$ ("63777F6B636 
さ 6 さ の の 6 さ フ フフ F6B6 さ ら さ 6 さ の の 6 さ 777F 6B6 さ 6 さ 6 さ の" ) 
60620 DEFCHRS (&H4E) =HE XCHR ま ("6 さ 7 さ 7B7F6F6 
76 る の の 6 さ 7 さ 7B7F6F676 さ の の 6 さ 7 マ 7B7F6F676 さ の の " ) 
60630 DEFCHRS (&H4F ) -HEXCHR$ ("1C366363633 
61C001C36636363361C001C36636363361C00" ) 
60640 DEFCHRS (&H5Ø) =HEXCHRS (""7E63637E606 
050007E63657bE606060007E536:7E60606000" ) 
60650 DEFCHRS (&Н51 ) =HEXCHRS ("1C3663636F 3 
61F001C36636036F361F0201C73663636F361F00") 
60660 DEFCHRS (&H52) =HEXCHRS ("7E63637E636 
さら 6 さ の の 7 ビ 6 さ 6 さ 7E6 さ 6 さ 6 さ の の 7E6 さ 6 さ 7E ビ 6 さ 6 さ 6 さ の の" ) 


,60670 DEFCHRS (&HS3) HEXCHR$ (" SE63603EQ 56 


52Е005Е63603Е05625Е002Е62605Е05655Е00") 
60680 DEFCHR$ (&H54) =HEXCHRS$ ("7E181818181 
818007E181818181818007E18181818181808") 
60690 DEFCHR*(&H55 ) =HEXCHRS ("63636363636 
53Е005552656562655Е006563656265622Е00") 
60700 DEFCHR$ (&HS6) HEXCHR$ ("63636336361 
C 1C の の 6 う 36 さら 6 ささ 6 う 36 1C 1C の の 6 さら 6 さら 6 ささ 6361 じ 1C の の " ) 
60710 DEFCHR$ (&H57) -НЕХСНК%("6365656В7Ғ7 


%4752006265556В7Ғ7762006565636В7Ғ776500") 


60720 DEFCHR$(&H5B ) =HEXCHRS ("6363361C366 
さら 6 さ の の 6 さら 6 ささ 6 1 じ さ らら 6 さ 6 さ の の 6 ら さ 6 ささ 6 1 ビ さ らら 6 さら 6 う 3 の の " ) 
60730 DEFCHR$(£&H59)-HEXCHR$ ("6666663C181 
81800566556663C181818006666665C18181800") ` 
60740 DEFCHR$(&H5A)-HEXCHR$ ("7FQ3061C306 
07F007F03061C30607F007F03061C30607F00") 
60750 DEFCHRS (HSB) -HEXCHR$ ("2C183030:01 
B の Cg の の C 1 8303030 1 80C0020C 1 83030301 80C00") ` 
60760 DEFCHRS (&HSC) -HEXCHR$ ("606065697717 
96D の の 6 の 6 の 65697 1 7 ワウ 6D の の 6 の 6 の 65697 1 796D の 9" ) 
&@77@ DEFCHR ま (&H5D ) =НЕХСНК% ‹"@@@@0@АВА9А 
QAAOO の の の の D の ABA ウ QAAAO の OO の 9 の D の QBA ウ AAAA の OO の" ) 


し か し 皆さん , 


60780 ПЕҒСНКФ (НЕ ) HEXCHR$ ("18585E99191 
9190018585Е991919190018585Е9919191900") 
60790. DEFCHR$ (&HSF) -НЕХСНКФ("20180С0С0С1 
83000230 1 80COCOC 1 8300030 180COCOC18:000") 
60800 DEFCHRS (&Н&@) -HEXCHR$ ("13007170000 
0200000 10ғ05020000000000502Е0700000000" ) 
60810 DEFCHR ま (&H61 ) =HEXCHRS ( "ОО ООҒ1ҒОҒО 
の の の の の の の の の の ら の の の の の の の の の の の の の 1 050000000000" ) 
60820 DEFCHR$(*H62) =HEXCHR ま ("の の の の の 7 の F の F の 
ノア の の の の の の の の の の の ら の の の の の の の の の の の の の の ワウ 7 プ の の の の の の の の " ) 
608250 DEFCHR ま (&H6 さ ) =HEXCHR ま ("の の の の 1F さ F マ さ F マ 
F 1F の の の の の の の の の ら の の の の の の の の の の の の の の の 7 の の の の の の の の " ) 
690840 DEFCHR ま (&H64 ) =HEXCHRS ( "@@@@1F 3F ZF 3 
F SF 1F の の の の の の の の の の の の の の の の の の の の の の 7 の の の の の の の の " ) 
60850 DEFCHR ま (&H65 ) =HE XCHR ま ("AO の の の の の の の 9 
の の の の の AAFFFFFFFFFFFFFFAASSAA5SAA5SQA55" ) 
60860 DEFCHR$($&H6565)-HEXCHR$ ( "FFFBF8F8F8F 
BFBF B の の の さ の さ の この さ の さ の この さ の の の の の 9 の の の の の の の の の の の" ) 
60870 DEFCHRS (&H67) -HEXCHR$ ("FFFEFEFEFEF 
EFEFE の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の "> 
60880 DEFCHR$(&H68)-HEXCHR$ ("FFFQCOCOCOC 
оғоғғоғзасосасасозооғоғ>асасасасаздағ " › 
60890 DEFCHR$(&H69) HEX CHRS ( "200000000൭0 
の の 1 の の の の の の の の の の の の の 1 の つの 7 の の の の の の の の の の の の の の の の " ) 
60900 DEFCHR ま (&H6n ) -HEXCHR$ ("QOQOF 1F1F1FQ 
の ウミ F 7F の の の の の 1 の の の の さ F の の の の の の の の の さこ 1 の 18 の 9 の の 9 の の " ) 
60910 DEFCHR$(&H6B) -HEXCHR$ ("7F7F7F7F 7F 7 
F7F3FO05000000000000004760605050400000 " ) 
60920 DEFCHR$(&H6C) -HEXCHR$ ( "22000000000 
205ғ7ғ00000000000 1 00000000000000000000" ) 
60950 DEFCHR$(&H6D) -HEXCHR$ ("7F7F7F7F7F7 
F 7F 3F 15 の の の の の の の の の の の の の の 1F の の の の の の の の 9 の の の の の ' ) 
60940 DEFCHR$(&H6E) -HEXCHR$ ("20000000000 
りさ F 7F の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の " ) 
60950 DEFCHR ま (&H6F ) -HEXCHR$ ("7F7F7F7F7F7 
F 7F 3F 15 の の の の の の の の の の の の の の 1 F の の の の の の の の の の の の の の " ) 
60960 DEFCHR$(&H70) -HEXCHR$ ("CB の の BE の E の の の 
の の の の の B の F の 9 ウ の 4 の の の の の の の の の B の の じ 74E ロ の の の の の の の の ") 
60970 DEFCHR$(&H71)-HEXCHR$ ( "ЕЗ00Е2Е0Е00 
の の の の の の 1 OF 4305020000001 DF の 5C さ E の OF の の の の の " ) 
60980 DEFCHR$(&H72) =HEXCHR ま ("3E の の FCFCFCF 
CO の の の の の の の の 1 49 の の の の の の の の の 1FF の 2E ア の 7 の 1 の 9 の の " ) 
60990 DEFCHR$(&H73)-HEXCHR$ ("3FQOFFFFFFF 
FFF の の の の の の の の 5 の の の の の の の の の の の FF の の F9 の 1 の 1 の 9 の 9" ) 
61000 DEFCHR$(&H74) =HEXCHRS ( " SFOBFFFFFFF 
FFFFF の の の の の の らら の の の の の の の の の の FF の の FF の の の の の の の 9 の" ) 
61010 DEFCHR$(&H75)-HEXCHR$ ("205502000000 
000000055SFFFFFFFFFFFFQOSSAASSAASSAASS" ) 
61020 DEFCHR ま (&H76) =HEXCHRS ("ЕҒЗЕЗЕЗЕООЭ 
E さ E さ E の の C の CO の CgFFC の C の じ の の の の の の の の の の の の の の の の の " › 
61030 DEFCHR$(&H77) =HEXCHRS ("ЕЕ@Е@Е@Е@Е@ 
ғоғогоаоғоғоғоғағоғоғғогагогогагогогогов”, 
61040 DEFCHR ま も (&H7B ) -HEXCHR$ ("FFOFQO303Q030 
さり の FFFF ウ の C の さ の さ の さ の くさ の CFOF 9 の 9 の C の さ の さ の さ の さ の CF の " ) 
61050 DEFCHR$(&H79) =HEXCHRS ("000000000൭0 
の B の の の の の の の の の の の の の B の 4 の E の の の の の の の の の の の の の の の の の" ) 
61060 DEFCHRS (&H7A) =HEXCHRS ("ОО ЕЯҒОҒОҒОО 
の FFFF の の の の 4 の の さ の FFF の の の の の の の の E の の の の の の の の の の の " > 
61070 DEFCHRS (&H7B) =HEXCHR$ ("FFFFFFFFFFF 
FFFFFS4 の の の の の の の の の の の の の の FE の の の の の の の の の の の の の 0 " ) 
61080 DEFCHR ま (&H7C =HEXCHRS ("QO3F7F7F7FQ 
の FFFF の の の の の の の の の FF の の の の の の の の 1F の の の の の の の 9 の 9 の" ) 
61090 DEFCHR$(&H7D) -HEXCHR$ ( "FFFFFFFFFFF 
FFFFF5S4 の の の の の の の の の の の の の の FE の の の の の の の の の の の の の の " ) 
61100 DEFCHR$(&H7E ) =HEXCHR ("20000101210 
の FFFF の の の の の の の の の の 1 F の の の の の の の の の の の 9 の の の の の の の の " ) 
61110 DEFCHR$ (&H7F) HEXCHR$ ("FFFFFFFFFFF 
FFFFF54 の の の の の の の の の の の の の の FE の の の の の の の の の の の の 9 の 9" ) 
61120 DEFCHR$(&H80) =HEXCHR ま ("FFFFBBA の その 
の BBFF の の の の の 77CFB フ 7 じ の 7 の の の の の の の の の の の さこ の の の の の の" ) 
61130 DEFCHR*(&H 1 ) =HEXCHR ま ("ビア ウ の 47 の 7 の 7 の 
の の の の 98 の F の CS の 4 の の の の の の の RB の F さ Q7CF の の の の の の の" ) 
61140 DEFCHR$(£H82)-2HEXCHR$("1FQ07bkEQ00000 
gooQQQO:FFFFQOSA3SSAQOOQODEl;QOQDQOFCFCFFOQOQOQ") 
61150 DEFCHRS$(*&H83)-HEXCHR$ ( "EQ000:507000 
002020200 1F3F =F0015000007E0COCOFFFF3FQQ") 
61160 DEFCHR ま (&HB4 ) HEXCHR$ ( "E0000 മഥ 
0COCODOOF 1F 1 FOC 1500000FF 0E060737F7FQOF") 
61170 DEFCHR$(&HB5 ) HEXCHR$ ("20004400020 
の の の の の の 9 の 9 の QAFFFFFFFFFF の gg の AA55AnSSAA55") 
61180 DEFCHR$(&HB6) -НЕХСНК% ("ҒҒОВОВОВОВО 
B の の B の の F さ F ミ F ミ F コ F さ ミ F さ F さ の の の の の の の の の の の の の の の の " ) 
61190 DEFCHRS (&H87) -HEXCHR$ ("FFFFFFFEFEF 
EFF の その の の の の の の の の の の の の の F C の の の の の の の の の の の の の の の の " ) 
61200 DEFCHRS (%HB8) =НЕХСНКФ ("FFFQCOCOCOC 
QF OFF OF OC7CCCCCO3SOOF OF 3FFFFFFFFF3FOF") 
61210 DEFCHR$(&HB9) =HEX ビ HKR ま ("の の の の の の の の の の の 
1 の さ の の の の の の の の の の の 1 の つ ロ 4 の F の の の の の の の の の の の の の の の 9" › 
61220 DEFCHR$ (&H8A) =HEXCHRS ( "20000000000 
の B の C の の の の 77FFFFFFF7F3E の の の の 29 の 91E3 さ F1F1F") 
61230 DEFCHR$(&H8B)-HEXCHR$ ("COCOCZC7C7C 
さじ OB の さ F さ F ミ F さ E さ D さ E の F の の 9 の じ の の の の 9 の の の の の の の の 9" ) 
61240 DEFCHR$(&H8C)-HEXCHR$ ( "の の B の CO の COB の の 
り の B の C の の の の の の 11F7FFF7C3C の の の の の 4 の の E1F1F ウ F" ) 
61250 DEFCHR ま (&HBD ) =HEXCHRS ("COCOCSC7C7C 
さじ OB の マ F さ F さ F さ E さ D さ E の F 99444 の 4 の 4 の 4 の 4 の の の の の " ) 
61260 DEFCHR ま も (&HBE ) =HE XCHR ま ("の の FEFFFFFC の 
, の 8B の C の の の の の 2 日 の の の さ FF 7 ヒコ F の の の の 7 日 の さ の その 797 の くる") 
61270 DEFCHR ま (&HBF ) =HEXCHR$ ( "C@C@CZC7C7C 
こじ OB の く F ミ F さ F さ E さ D さ E の F 004 1 C の C の COC の 4 の 9 の 9 の の の " ) 
61280 DEFCHRS (ҰН90) -HEXCHR$ ( "FFCOO050815 
@00С@0@0@@С&7С7С7СС&@@@@02@0@&5@ЕВЕФ@Е@&@@" ) 
61290 DEFCHR$(&H91)-HEXCHR$ ("QOGOFOFGFOO0 
の の の の の の の の の Q の の の の の の の の の の の の の 8 の QO の の の の 9 の の の の の ") 
61300 DEFCHR$(&H92)-HEXCHR$ ( "F8097E00000 
の の の の の CO の FFFFC の CS2A の の 9 の C7 の の の の さ F さ FFFg の の の" ) 
61310 DEFCHR$(&H93) -HEXCHR$ ( '' SFOQFEFCOOQD 
@@0000@5ЕЕЕЕЕЕ@4 1 20 の の C さ の の の の の 9 の FCFEFF の の " ) 
61520 DEFCHR$ (&H94) =HEXCHRS ("の の の の FFFFg の の 


の の の の の の 5FFFFFF ウ ASS の QA の の FF ウ の の の の の FFFFFFFF") 
61330 DEFCHR$(&H9?5) -HEXCHR$ ("020000055000 
の の の の の の の の の の の 5SFFFFFFFF ウ の の の 9 の 55QAASSAA55" ) 
61340 DEFCHR$(&H96) =HEXCHR$ ( "FF383020202 
@@0@58В@@СЗС7СЕСЕСЕС7СҖ@@@0000@@00@@0@0@@" ) 
61550 DEFCHR$ ($H97) =HEXCHR$ ("ЕЕВӘ@7@Е@Е@ 
F の 7B の の の マ F 78F OF OF 2783F の の の の の の の の の の の の の の の の" ) 
61360 DEFCHR$(&H98)-HEXCHR$ ("FFOFQ303030 
3QFFFFOOCO:SQ3SOSOSOCFOFOFCFFFFFFFFFCFO") 
61370 DEFCHR$(£&H99)-HEXCHR$ ("20000000008 
の 4 の の の の の の の の の の の 日 の 4 の つの F の の の の の の の の の の の の の B の の の " › 
61380 DEFCHR$.(&H9?A)-HEXCHR$ ("2327 OF OF 220 
@@0@005СЕВЕ@Е@ЕЕЕЕ@@@@0@@8@@0@0@@@@ЕЕЕЕЕЕ " ) 


61590 DEFCHR$(&H9B)-HEXCHR$ ( "の の の の FFFFFFF - 


F ウ の の OFFFFFFFASSFAFF の の の の の の の の の の の の の の の の の の" ) 
61400 DEFCHR ま (&H9C ) =HEXCHRS ("200000010730 
の の の の の の の 1FFFFEFCFF ウ OO の の の の 2 の 9B2 の の の FFFFFF'") 
61410 DEFCHR ま (&H9D ) =HE XCHR ま ("の の の の FFFFFFF 
F の の の の FFFFFFFA55FQFF の の の の の の の の の の の の の の の の の の " ) 
61420 DEFCHR$(&H9E) =HEX じ CHR ま ("の の の の の の の の の の の 


の の の の の の の の の 977 フ FFFFF の の B の の の の の の の の の 8 の FFFFFF" ) 
61430 DEFCHR$(&H9F ) =HEXCHR ま ("の の の の FFFFFFF 


Fgg の OFFFFFFFA5SSFAFF の の の の の の の の の の の の の の の の の の" ) 
61440 DEFCHRS (&HAQ) =HEXCHRS ( "20000000000 
00202003F 7F787%79%787F 3F0000000002000000") 
61450 DEFCHRS (&HA1 ) =HEXCHRS ("20000000000 
の の の の マ F7F 7878 7F 7F 7 ヨコ 7B の の の の の の の の の 9 の の の の の の の " ) 
61460 DEFCHR$(&HA2) =HEXCHRS ("7COQ SF SF SF 3 
FOODOODDOSOO02ODODOODOOSOFFA4OE7EO0800000") 
61470 DEFCHR$(&HA3) -HEXCHR$ ("FCOQ7F SF O00 
QooogocorrFrFFFFCOB825400C3000QQO3F7FFFQOQ") 
61480 DEFCHR$(&HA4) -HEXCHR$ ("7FOOFEFCOOQ 
の の の の の の 7FFFFFFg さ 4 さ の 1 28B7 の の の の の の FCFCFEFF" ) 
&149@ DEFCHRS (&HAS) =HEXCHR$ ("の の の の の の の の QA の 
の の の の の の の の の の の の の QAFFFFFF の ウ の の の の の QA55SAn55" ) 
61500 DEFCHR ま (&HQ6) =HEXCHR ま ("FF ウ の さ F フ FC の 7 ア 
B こ の の の 9 の FFC の OB の 1F 昌 さじ 7FF ワ の の の の の の の の の の の の の の の " ) 
61510 DEFCHR$ (&HA7) =HEXCHRS ("FFOE0582828 
2 の 6 の E の の F の 7 日 さじ さじ さじ 7BF の の の の の の の の の の の の の の 9 の 9 の" ) 
61520 ПЕҒСНК%(%НАВ) =HEXCHRS ( "FFFOCOCOCOC 
QFarFOFSFFFFFFFFFSFQOFQF3OC7CCCCCOSOQOF " ) 
61550 DEFCHR$(&HA9) HEXCHR$ ("020002000000 
1020000000001 の さ の 6 の C 1F 2000000000000 100") 
61540 DEFCHR$ (&HAA) =HEXCHR* ま ("FEFFFFFF の の 9 
の の の の の の 19 の さ の さ BFFFF の 1 の さ の の その 7 ビ 7E の の FFFFFF" ) 
61550 DEFCHR$(&HAB) =HEXCHR ま ("の の の gF ウ F の E の E 
の の の の の FFFFFFBF7FBFFFSF の 7 ウフ アウ の 1 の の の の の の の の " ) 
61560 DEFCHR$ (&HAC) -HEXCHR$ (" 1F7FFFFF800 
oooQQOEOBOO1037FFFQ0103000:3070F QOFFFFFF ") 
61570 DEFCHR$ (&HAD) =HEXCHRS ("QOO0FBFOEOE 
B の の の OFFFFFFBF7FBFFF2F の さり さ の さ の 1 00000000") 
61580 DEFCHRS (&HAE) =HEXCHRS ("20000307000 
の の の 9 の の マ 7FFCFBFFFFgF ウ 79 の の B29B の の OFFFFFF") 
61590 DEFCHRS (&HAF ) =HEXCHRS ("の の の OF の F の OFBF 
B の の 9 の FFFFFFBF7FBFFF2F の 7 の この さ の さ の の の の の の の の " ) 
61600 DEFCHR$.(&HBQ) -HEXCHR$ ("20000000000 
の の の の の FCFE の の FEFE 1ЕҒЕРСФООООООООООООООО") 
61610 DEFCHRS (&HB1) =HEXCHR ま ("の の の の の の の の の の の 
の の の の の FCFE1E1EFEFE 1E 1E の の の の の の の の の の の の の の の の " ) 
61620 DEFCHR$(&HB2) =HEXCHR ま ("の の の の E の OF の F の E 
の の の の の の の の の の の の の の の の の の の の の の の の の E の の の の の の の の の " ) 
61630 DEFCHR$(&HB3) =HEXCHRS ("の 7 の の C の E ビ の の の の 
の の の の の の の FBFCFC の の QB の の の の E の の 7 の さ の さ FFFFFC の の" ) 
61640 DEFCHRS (&HB4) =HEXCHR ま ("FE の の 7F さ F の の の 
の の の の の E の FFFFFFCg じ 2B の 54E 10000003F 3F7FFF") 
61650 DEFCHR$ (&HBS) =HEXCHRS ("20000000005 
5 の の の の の の の の の の の の の の 5S5FFFF 999 の の の の の の の 55AQ55" ) 
61660 DEFCHR ま $(&HB6) =HEXCHRS ("FF20EQ0EQ0202 
の 6 の E の 9 の CFOF の FCFCFBF OF の の の の の 9 の の の の の 9 の の の の " ) 
61670 DEFCHRS (&HB7) =HEXCHRS ("FFOFQFOBO00 
02307 OOF OF OF 3F 7FF FCF8000000000000000൭") 
61680 DEFCHRS (&HB8) =HEXCHRS ("FFOF0303030 
ZSOFFFFOFCFFFFFFFFFCFOF00C030303030CFQ") 
61690 DEFCHR ま (&HB9) =HEXCHRS ("200000000008 
の C の の の の の の の の の 8 の Cg6 の くさ の F B9 の 9 の の の の の の の の 9 の の の 999" ) 
61700 DEFCHRS (&HBA) =HEXCHR* ま ("の の の の CO の E の の の の 
の の の の の CO の FE さ F 1FFFFFF ウ E の の 9 1 の の 4 の 1 の の FFFFFF") 
61710 DEFCHR$((&HBB) =HEXCHR も ("の の の 9 の F の F 1F1 
F の の の の FFFFFFFDFEFDFFF4E の CgCOCO の の の の の 9 の の 9" ) 
61720 DEFCHR$(&HBC) =HEXCHRS ("FBFEFFFF210 
の の の の の の 7 の 918 の CgFEFFB の CO の の COE の F の の の FFFFFF") 
61720 DEFCHRS (НВО) =HE XCHR$ ("の の の 91F の OF の 71 
7 の の の の FFFFFFFDFEFDFFF4Cg ワ CO の C の OB の の の の の の の の の " ) 
61740 DEFCHR$(&HBE) -HEXCHR$ ("7FFFFFFFOOQ0 
の の の の の 8 の 9 の 9 の じ 1CFFFFB の Cg の の の C さ ビ フ 7E ウ の FFFFFF" ) 
61750 DEFCHR$ (&HBF) =HEXCHR$ ( "の の の の の F の OF の 7 の 
7 の の の の FFFFFFFDFEFDFFFAE の E の COB の の の の の の の の の " › 
61760 DEFCHR$(&HCQ) =HEXCHR ("20000000000 
000007C7E7F7B797878780000000000000000 " ) 
61770 DEFCHR$(&HC1) =HEXCHRS ( "20000000000 
0900007F7F787F7F 787F7F の の の の の の の の の の の の の の の の " ) 
61780 DEFCHR$(&HC2) =HEXCHRS ( "の の の の 9 の の の の の の 
09000Q3F7F787878787F 3F の の 9 の の の の の 9 の の の の の の の 9 " ) 
61790 DEFCHR$(&HC3) =HEXCHRS ("FC の の OFFFFFFF 
FFF の の の の の の の の の QA の の の の の の の の の の FF の の ウ FBOB の の の の の " ) 
61800 DEFCHR$(&HC4) =HEX ビ HR 和 も ("の の の の FFFFO の 9 
の の の の の QA の FFFFFF5S の nAS の の の FF の の の の の の FFFFFFFF" ) 
61810 DEFCHR$(&HCS)-HEXCHR$ ("20000000000 
の QA の の の の の の の の の の の の の の QAFF の の の の の の の の の の の の AA55" ) 
61820 DEFCHR$(&HC&) =HEXCHR*("FFFBFBFBO の F 
8F 8F B9 の の 9 さ の さ の さく FF の さ の さ の さ の の 9 の の の の の の の の の の の の " › 
61830 DEFCHRS (&HC7) =HE XCHR*$("FFEOE の 2 の の の 9 の 
の 8B の CO の 9 の F の FCFEFFF さ F 1F の の の の の の の の の の の の の の の 9 の" ) 
61840 DEFCHRS (НСВ) =HEXCHRS ("FFFFFBF3F3F. 
FFFFF@F S3OC7CCCCCOSOOF 9 の F さ の CZ7CCCCC の さ の の F " ) 
61850 DEFCHR ま (&HC9) -HEXCHR$ ("の の の の の の の の の 1 の 
さり 6 の の の の の の の 1 の さ の 6 の C 1 日 ミ F 0000000000000 100") 
61860 DEFCHRS (SHCA) =HEXCHRS ( "00000000000 
の の の の の の の の の E の FEFFFF の の の 1 の の の の の 9 の の の の 91FFFFFF ") 


TURBO2 ソー ス ・ リ スト 


61870 DEFCHR$ (НСВ) =HEXCHRS ( "の の の gFFFFFFF 
F の gg の の FFFFFF5SFQASFFF の の の の の の の の の の の の の の の の の の" ) 
61880 DEFCHR$(&HCC) =HEXCHR* ま ("の の の の の の 8 の C の 9 ` 
の の の の の の の FBFF 7F ミ FFF の の の の の の 4 の 1 の の 4 の の FFFFFF" ) 
61890 DEFCHR$(&HCD) =HE XCHR$( "の の の の FFFFFFF 
F の の の の FFFFFFSFQRASFFF の の の の の の の 9 の の の の の 9 の の の 99" ) 
61900 DEFCHR$(&HCE) =HEXCHRS ("COEOFOFOGDO 
の の の の の さじ 1F の OF の FFFFFO の の の の の の 1 の の の の の の FFFFFF" ) 
61910 DEFCHR$(&HCF) =HE XCHR$ ま ("の の の の FFFFFFF 
Fg の の の FFFFFFSF RANSFFF ウ の の の の の の の の の の の の の の の の の " ) 
61920 DEFCHR$(&HDQ)-HEXCHR$ ("20000000000 
の の の の の さ E フ 7EFEDE9E 1 E 1E 1 の の の の の の の の の の の の の の の の " ) 
61930 DEFCHRS (&HD1) =HEX ビ HR* ま ("の の の の の の の の の の の 
の の の 9 の FEFE の OFBFBO の OFEFE の の の の の の の の の の の の の の の" ) 
61940 DEFCHR$(&HD2 ) -HEXCHR$ ( "200000020000 
の 9 の の FCFE1E1E1E1EFEFC の の の の の の の の の の 9 の の の の" ) 
61950 DEFCHR$(&HD さ ) =HEXCHR$ ("の の の の OFBFCFCF 
CF B の の の の の の の の の の の の の の の の の の の の の の の E の の の の の の の の の" ) 
61960 DEFCHRS (&HD4) =HEXCHR* ま ("の 7 の の の じ さ の さ の 
3030300F OF SF 日 この AB の の の の F の の F の 7 の 6CEFEFEF の " ) 
61970 DEFCHRS (&HDS) -HEXCHR$ ( "20000000000 
の の の らら の の の の の の の の の の の の の の 5 らら の の の の の の の の の の の の の の 55" ) 
61980 DEFCHRS (&HD6) =HEXCHR ま ("FF さ F さ F さ F さ F さ 
F SF 3F 9 の じ の じ の じ CO の C の CO の C の CO の の の の の の の の の の の の の の の の " › 
61990 DEFCHR$(&HD7) =НЕХСНКФ ("FFFFFFFFFFF 
FFFFF の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の" ) 
62000 DEFCHR$ (&HD8) -HEXCHR$ ( "FFFFFFFFFFF 
FFFFFF の の じ の さり の さ の さ の さ の C ビ F の F の 9 の C じ の さ の さ の さ の さ の CF の " ) 
62010 DEFCHR$(&HD9) =HE X ビ HR* ま ("の の の の の の の の B の じ 
の 6 の の の の の の の B の じ の 6 の さ の 1 BFC の の の の の の の の の の の の 8 の の の " ) 
62020 DEFCHRS (&HDA) =HEXCHRS ("の の 7FFFFF さ F の 
0010300001 49 の COFF 7EFC ウ の の の 1ECOCOE の EC の " ) 
62030 DEFCHR$(&HDB) =HEXCHRS ( "Q-303CSE SE SC 
3030 1FCFCFC7CBC7CF0008203030303020000" ) 
62040 DEFCHRS (&HDC) =HEXCHRS ("20010303010 
021030022060F8FEFF3E3C0000000270F8F8F@Q") 
62050 DEFCHRS (&HDD) =HEXCHRS ‹"@%0%СЗЕЗЕЗС 
30301FCFCFC7CBC7CF0002202020202020000 " ) 
62060 DEFCHR$(&HDE) -HEXCHR$ ("20000000000 
の の 1 の さ の の E の FEFFFFFFFE7C ウ の 9 の 4 の 997 ロ FCFBF 日 " ) 
62070 DEFCHR$(&HDF ) =HE XCHR ま ("の さ の さじ さ E ビ さ E さ ビ 
さ の くさ の 1FCFCFC7CBC7CF の の の さり の の の の の の の の の の の の の の " ) 
62080 DEFCHR$(&HEQ) -HEXCHR$ ( "020200000000 
00000787878783C1EQF070000000000000000 " ) 
62090 DEFCHRS (&HE1 ) =HEXCHRS ("20000000000 
000007F7F787F7F7878780000000000000000 " ) 
62100 DEFCHR$(&HE2) =HEXCHRS ( "の の の の の の の の の の の 
の の の の の さ F フ F フ ロフ 7F さ F ウ の 7F さ F の の の の の の の の の の の の の の 9" ) 
62110 DEFCHR$(&HE3)-HEXCHR$ ("00000000000 
の の の の の 97F 7F の さ の さ の さ の その さ の さ の の の の の の の の の の の の の の の の " ) 
62120 DEFCHR$(&HE4) =HEXCHRS ("FCOOFFFFFFF 
FFFFF の の の の の の QA の の の の の の の の の の FF の の FF の の の の の 9 の の " ) 
62130 DEFCHR$(&HES) HEXCHR$ ("3C2424E7814 
224183C2424E7814224183C2424E781422418") 
62140 ПЕҒСНК% (НЕФ) =HEXCHRS ("18284F81814 
F281818284F81814F281818284F81814F2818") 
62150 DEFCHR$ (&HE7) =HEXCHRS ("1814F28181F 
214181814F28181F214181814F28181F21418") 
62160 DEFCHR$(&HE8) HEXCHR$ ("18244281E72 
4243C18244281E724243C18244281E724243C") 
62170 ПЕҒСНК% (&HE9) =HEXCHRS ("2000000100 
&5®@Е@@@@@1@5%@25@С185@7Е の の の の の の の の の の の 1 の 1 の の " ) 
62180 DEFCHRS (&HEA) =HEXCHR$( "മമമമദമദമദമമ 
の FFFF の の の の の の の の の の F B の の の の の の の の の の の の の の の の の の 9 の " ) 
62190 DEFCHR$(&HEB) =HEXCHR$("FFFFFFFFFFF 
FFFFF2A の の の の の の の の の の の の の の 7F の の の の 9 の の の の の の の 9 の " ) 
62200 DEFCHR$(&HEC ) =HEXCHR$ ( " OOFCFEFEFEO 
の OFFFF の の の の 5 の の の の の FF の 9 の の の の の の FBO の の の の の の の の 9 " ) 
62210 DEFCHR$(&HED ) =HEXCHRS ("FFFFFFFFFFF 
FFFFF つの の の の の の の の の の の の の の 7F の の の の の の の の の の の の の " ) 
62220 DEFCHR$(&HEE ) =HEXCHRS ("2207 0F OF OF 0 
@ЕЕЕЕ@@@0002С@Е@ЕЕ の の の の の の の の の 7 の の の の の の の の 9 の " ) 
62250 DEFCHR$(&HEF ) -HEXCHR$ ("FFFFFFFFFFF 
FFFFF 2AO の の の の の の の の の の の の の 7F の の の の の の の の の の の の の の " ) 
62240 DEFCHR$(&HFQ) =HEXCHRS ("020000000000 
000001Е1Е1Е1ЕЗСТ?ӘӨРҒОЕООООООООООООООООО") 
62250 DEFCHRS (&HF 1) =HEXCHRS ("20000000000 
の の の の 9 の FCFE1EFEFC1E1E1E の の 9 の の の の の の の の 9 の 999 " ) 
62260 DEFCHR$ (&HF2) =HEXCHRS ("00000000000 
の の の の の FCFE の の FCFE 1 ヒ FEFCg の の の の の の の の の の の の の の の " ) 
62270 DEFCHRS (&HF 3) =HEXCHRS ("00000000000 
の の の の の FEFEC の CO の C の C の CC の の の の の の の の の の の の の の 9 の 9 の" ) 
62280 DEFCHRS (&HF 4) =HEXCHRS ( "ØØØØFBFCFCF ` 
CFCF B の の の の の の の の の の の の の の の の の の の の の E の の の の の の の の の " › 
62290 DEFCHR$(&HFS5) -HEXCHR$ ("20000000000 
の の の の の の の の の の の の の の の 99 の の の の FFFFFFFFFFPFFFFF" ) 
62300 DEFCHR$(&HF6 ) =HEXCHR 和 ("の の の の の の の の の の の 
の の の の の FFFFFFFFFFFFFFFF ワ の の の の の の の の の の の の 9 の の" ) 
62310 DEFCHR$(&HF7) -HEXCHR$ ("FFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF" ) 
62320 DEFCHR$(&HFB) -HEXCHR$ ("FFFFFFFFFFF 
FFFFF の の の の の の の の の の の の の の の の の の の の の の の の の の 9 の の の の の ") 
62330 DEFCHR$(&HF9 ) =HE XCHR ま ("の の の の の 9 の 98 の Cg6 
の 7 の の の の の 8 の C の 69 さ の 1 の 9CFE の の の の の の の 9 の の の 98 の 8 の の の "> 
62540 DEFCHR$(&HFA) =HEXCHR 和 ("の の の の の の の の の の 
の FCFE の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の の " ) 
62350 DEFCHR$(&HFB ) =HEXCHR ま ("FEFEFEFEFEF 
EFEFCAB の の の の の の の の の の の の の の F B の の の の の の の の の の の 9 の 0 " ) 
62360 DEF CHRS (&HFC) HEXCHR$ ( "02000000000 
оғсғеоооооаоаговоогооогогогагагогаогога”> 
62570 DEFCHR$(&HFD ) =HEXCHR ま ("FEFEFEFEFEF 
EFEFCAB の の の の の の の の の の の の の の F B の の の の の の の の の の の の の 9 の" ) 
62380 DEFCHR$(&HFE) =HEXCHRS ("DAF OF BF SF BQ 
の FCFE の の の の B の の の の の FC の の の の の の の の じ の 日 189 の の の の 9 の " ) 
62390 DEFCHR$(&HFF) HEXCHR$ ("FEFEFEFEFEF 
EFEFCA の の の の の の の の の の の の の の の 9E2 の 6 の 6 の 6969299 の の " ) 
62400 RETURN 
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TAF 基 地 ま で は , あと ほん の 500m Có 
ot. 両 サ イド に お 花畑 の ある 幅 25m ほ ど 
の 道 の 入 り 口 で , 俺 は "カオス" に 乗っ て 
か すか に 見 える TAF 基 地 を 眺め て いた . 

“カオス” と は 全長 1 m ほ どの タン ク で 
秒速 2.5m と 非常 に 鈍 速 で ある . な ぜ こ ん な 
も の に 乗ら な いと いけ な いか …. それ は 瑞 
が いる か ら で あ る . TAF 基地 に 行く 俺 を 止 
め よ うと , ター プル , フロ アー, エサ ッ チ 。, 


- ラ レッ クス の 4 種 が 俺 を 攻撃 し て くる . Ж 


ht "カオス" て 破壊 し な が ら 進 む た め で 
ある . 

MATR DOCAL ER 
あっ ノノ し まっ た / ノ 弾 を 忘れ た . ノ 
画 プ ログ ラム ・ イ ン フ ォ メ ーション 


BASIC 
マシ ン 語 F000~FIFF 


キャ ラク タ を も う 少 し 大 きく し た 
Ubertus car cde ا‎ 


NJ | КЫ + 
PO 4 +X + ++ 5% 
まず 。 BASIC 部 (リス ト 1) を 入力 
て テー ププ" に セー ブ し ます . 

KE, モニ タ か ら マ シン 語 部 (リス ト 2) 
を 入力 し , 入力 が 終わ っ だ ら PiO8 月 号 に 


REM RURDL INE 

REM COPYRIGHT 1982 Bu Puck. 

REM ന്നാ. or 

REM Imm H MICRO COMPUTER, 

REM == x+ . CLUB 
1983.11.27 


REM Made bu Fuck. 
REM 

REM ORIGINAL. ささ 
REM MACHINE $FOOO-^$F9FF 


оосо YO C 50 ല്‍ 


10 БІМС(5).М%(5).Н5%(4).Н5(4),НК(4):С(О 
)шО:С(1)-1: С(2) 0:C(2) =2:С(4) =O: C( 5) 25 
1 1 FORI=OTOS:MS(I)="-A0":NEXTEMS(1)="CO 
": M$ (3) ="AO" 
12 FORI-OTO4: HS( I) 2 (5-1) ¥2000: H8$ ( I) =МІ 
D$("PUCTAFJEMPOLS.F",IX3*1,3):NEXT 
00൮90൦52 , 24C40NGN: UP-10000 
LIMIT$FOOO: TEMPO7 | 
IFPEEK($F444) <> 195THENLOAD"ROAD D3" 
sos-"g E E и ` 
FOKE $952, 0: DEF KEY (5) =РОКЕФ952, 1667 
QUT3$FS,4:QUT3$F4,0 
USR( ま FBCD ) 
0 LE=1:MC=3:ST=2:UF=1:SC=0 
ട്‌ 5085083000 
CURSOR19-LEN(STR$(HS(O))) 1: PRINTHS( 


eher 2? 


pFX-702P の ユー ザー の 皆さん . まず 変数 を 拡張 し , 
くつ か 入れ て , それ か ら お も むろ に 裏 プ タ を 開け , 一 番 下 と , 


MZ-2200/2000 +G-RAM I. П, Ш 


a 


掲載 きれ だ チェッ ク ・ サ ム ・ ブ ログ ラム を 
使っ て チェ ッ ク ・ サ ム の 値 を 調べ , 入力 ミ 
ス が な けれ ば 先 の BASIC 部 の 後に モー プ 
し ます 。 


qo ++; HHH? 
z> eei + + E YA Yes 
4X e (+ ен м» +G G ++ 
ദ്ദ ദ 


まず , BASIC 部 を ロー ド し て RUN す る . 
L, 自動 的 に マシ ン 語 部 を ロー ド し て タイ 
トル が 表示 る され ます . そし て 何 か が 好き な キ 
ー を 押す と ハイ ・ ス コア と キー 操作 の 説明 
が 表示 され , 次 に [5| キ ー を 押す と ゲー ム が 
жер чк | 

自分 は "カオス" TT. これ を , [4] #7: 
は [1 | キー で 左 , [6] また は |3| キー で 右 , € 
L c[2] キー で 前 進 き せな が ら , ター プル ,、 フ 
ЖОЛЫН ҚА амы ауа 
ШЕН ( ൭") に ぶつ か ら な いよ うに 。 
と ん p CET cios «Tu eh 

(2:0, 300 一 400m の 間 は スリ ッ プ ・ ジ 
ー ン に な っ て お り , [2| キー を 押 き な いで も 
勝手 に 前 進 す る の で 注意 し て くだ さる 

また だ た, 100 一 200m の 間 は スー パー スリ ッ 
PS SPE STEYR WIT TA 
ン 同 様 勝手 に 前 進 し ます し , 7:൪൯ 
っ て 行く よう に な り ま す 。 Жы, これ は 途 
中 で 死ね ば も と の 道 に 戻り ます . 

を そして, 無事 に TAF 基 地 に だ た どり 着く と 
ボー ナス ・ ス テー ジ が あり ます . ボー ナス 
・ ス テー ジ で は カオ ス を 操作 し ,“ 珍 "” を 取 


41 CURSOROs 1: PRINT" о 

50 МТ=500: ВЕ=0: IFST=OTHENST=1 

52 CURSDR さ さ 。 О: PRINT"CAOCE " 

5% CURSOR33,O0:PRINT" z 

55 GOSUB1000: GOSUB780 

80 Х0=10: Ү0=24:Х1=10:Ү1=10:21=-1: Х2=10: 
Y228: 2220: X3=30: Y37224:L 20: A719 
2 CURSORXO, YO: POKESFFFF 。1 : USR( ま F ヨ OO ) 
CURSDRX 1 。 Y1: FDKE ま FFFF , 2: USRCS$FBOO) 
CURSUR X2。Y2: POKESFFFF s 3: USRC$F800) 
CURSORX3, YZ: POKESFFFF » 4: USR ($F800) 
CURSORA, 6: POKESFFFF , O: USR( ФҒВОО) 
IFST=2THENMUSIC "GOA+CTAF +DBG+CAF BSAB 
+C3AF +DEG+CAF BS+DB+CSAF +DBG+CAF GSDGF AEAB 
B": ST=0: 507099 

95 MUSIC"G3DGF7G3AGFSF66G8 

99 КЕМ -5ТАКТ- 

100 6050В600: IFDFGOTOSOOO 

102 IFGFGOTO2000 

105 ജട: SR=0: WF=0: ソソ =MVi ӨЕТАФ: МУ-О 

110 IF((A$2"4")*(A$2"1")) ж (А> 6) THENA-A- 
1:ЫҒ-1:МУ--1 

120 IF((A$2"6") *(A$-2" 3") ) ¥ (A< 32) THENA=A 
*1:WF-1:MV-1 

130 IFA$=" 2" THENSR=1 

125 IF(L<>3) *(MV«»0) GOTO140 


Ee МЧ ұсы 


P 
» 


っ て くだ さい 。 1 個 に つき 100 点 の ボー ナ 
ス が 与え られ ます 。 

以上 の ょ うに し て ゲー ム を 進め て いき 
10,000 点 で カオ ス が 1 基 増 え , 全部 の カオ 
ス が や られ る と ゲー ム ・ オ ー バ バー となり ま 
Ф: 
РН 


+ 


: ブ ログ ラム の 8 


രാ 
2 日 で (実際 は 細か い デ バッ グ な ど で , 
も う 少 し か か っ て いる が ) 作り あげ な た プロ 
グラ ム な の で 内 容 は ヌメ チャク チャ で す . 
マシ ン 語 は グラ フィ ッ ク ・ バ パタ ー ン を 捕 
く の に 使っ て お おり, $F800 か ら が 描き 
$F838 か ら が 消し で す . これ は 僕 の エディ 
タ で 作成 で きま す (ちな み に 、 
電子 で 売っ と り ま す ). 
いみ の ふき の みき の AS の の へ みき の の 


tenen 
++ 4 HH 
0:5 
+ £ 4 әб; + +++) +44 590292299 
1/ О プロ グラ ム ・ コ ユ コンテス ト の 作品 (РіО 

2 号 p.63 の イラ スト が イメ ー ジ イラ スト ) 
DIENT, 意地 で も 粗品 ほし る に プロ グラ 
ム を 作っ だ の で す が 。 きす が に 1 週間 や 2 
週間 で 作っ た も の は 恥ず か し くく て, 他 の 作 


アー バン 


品 と 比べ られ な いも の な の で や め ま し た . 


リス ト 1 ROADLINE BASIC J A F memes 


136 IF (A=6) +(A=32) THEN1 40 

127 MV-VV: A-A*MV: WF=1 

140 IF(L=1)+(L=Z)THENSR=1 

270 IFSRGOSUBSOO 

275 POKESFFFF , O: IFWFTHENCURSORE, 6: LISR ( $ 


F838) 


280 CURSORA, 6: USR( ま FBOO ) 
290 GOSUB4OO: IFDFGOTOSOOO0 
300 POKESFFFF,1:VO-XO:WO-YQ: YO=YO-1 一 SR* 


プロ グラ ム (何で も よい ) ЖАЛЫ, 変数 に も い റ; 統計 デ 
トド か ര 暗 シ ョ ー ト る せ て くだ さい 。 


бу БӘ 
a 
ന്ത്യ à 


BN 3 v. 24 Pup CN ў ; 
vei pone E Te 


IFYO< 2THENYO=24: ХО-АО 

301 IFYO»10THENAO-A 

205 CURSORVO,WO: USR ( $F838) : CURSORXO, YO: 
USR ($F800) 

210 FPOKE$FFFF,2:V1=X1:W1=Y1:X1=X1+Z1:Y1 
=Y1-1-SR: IFY1<2THENY1=24 : 
212 IF(X1=5)+(X1= さ くさ) ТНЕМ21--21:Х1-Х1%2Ж 
71 

515 CURSORV1,W1:USR($FB38B): CURSORX1 , Y1: 
USR ( $F800) 

320 РОКЕФЕҒҒҒ,2:У2-Х2:Ы2-Ү2:22-22%1:72- 
—Z22*(2243): IFZ2-OTHENX2zX2-*SGN ( A-X2) 

522 Y2=Y2-1-SR: IFY2&2THENY2- 24 

325 CURSORVZ, W2: USR ( $F828) : CURSORX2, Y2: 
USR ( $FBOO) 


. 330 POKESFFFF.4:V3SzX3:WZzY3:Y3-2Y$-2-SR: 


IFYS«2THENY2224: X さ =INT(RND( 1 ) %27+6) 


ー タ も い 
“2У7Уу7У9, どう な 
RS кя? 7 > M Vibe 


. 555 CURSORVS, W3: USR ( $F838) : CURSORX 3, ҮЗ 


5070580 


' 2110 


USR ( $F800) 

400 IFSRTHENSC=SC+LE #10: GOSUBBOO 

490 GOTO100 

500 51%-МІр%(50%,КМ0(1)Ж1541,5) 

505 52%-МІй%(50%.КМО(1)%15%1.5) 

510 MT=MT-1 

540 IFMT--8THENCURSORO , 24: PRINT: PRINT" 
| На ТАР EASE ES o_o 
: 800580 

545 IFMT< 1THENCURSORO, 24: FRINT: PRINT അ 
шы 


550 _ CURSURO。 24: PRINT:PRINTS1$; SPACES (29 
):82$; 

555 FORJ-1TOLE: CURSORRND ( 12 # 27+6, 24: PRI 
NT"8":;:NEXT 

560 IFINT(MT/20) *20=MTTHENCURSUR6。24: PR 
INTSTR$(MT); 

570 IFINT(MT/100) X100zMTTHENL = ( S00-MT) / 
100: QUT9$F4,C(L) 

580 MUSICMS(L) 

590 RETURN 

600 DF=O 

610 IF ( (Ү0=6) +( YO=7)) *X(XO=A) THENDF=1:RE 
TURN 

620 IF((Yi=6)+(Y1=7))%X(X1=A) THENDF =1: RE 


TURN 

650 IF((Y226) %(Ү2-7))Ж(Х2-А) THENDF =1 : RE 
TURN 

640 IF{ (YS=6)+(Y5=7)+(Y5S=B))8(XS= A) THEN 
DF=1: RETURN 

645 IFCHARACTERS (А, 6) -"8"THENDF-1:RETUR 
N 

647 IFCHARACTER$(A, 7) ="8" THENGF =1 

650 RETURN 

777 BRAPHOO,I1,C. I2; C4 I3, C4 0123 

778 POKESFFFF , 8: CURSORS, O: ШБК ( $F800) : CU 
RSOR12,0: POKESFFFF , 9: ധട ( ФҒВОО) 


779 RETURN 

780 CURSOR3S,1:POKES$FFFF , О: FORI-OTOMC-1 
785 IFI-OGOTO795 

790 USR($FBOO) :PRINT" "; 

795 NEXT: RETURN 

BOO CURSOR?-LEN( STR ま (SC) ) 。1:FRINTSCs 
810 IFSCKUF> =UPTHENCURSUR さ 4+MC 。 1:РОКЕ%Е 


FFF。OiUSR( ま FBOO) : MC=MC+1 : UF =O: MUS IC "CODE 
FGAB+C" | 

820 RETURN 

900 WFzO:B-A:GETA$:IF((A$-2"4")«*(A$-"1") 
(൧. O) THENA-A-1:WF-71 

905 IF((A$z"6")*(A$-"3"))X(AX 3B) THENA=A 
*1:WF-1 

910 IFWF THENCURSORB ; 6: USR( $F838) 

915 CURSORA; 6: USR($F800) : 

920 T=T-1: IFT<OTHENRETURN 

925 CURSORSS,1:PRINTT;" "3 

950 IFCHARACTERS (A, 6) "V" THENMUSIC"CO#C 
D":HzH*1: CURSORA, 6: PRINT" "3 

950 СОКЅОККМО (1) #359, 24: PRINT"w" 

980 IFCHARACTERS (А, é6) =" " THENMUSIC"CO#C 
D" :H=H+1 : CURSORAs 6: РКІМТ" "; 

990 68070900 

1000 GOSUB777: GOSUBBOO 

1010 FORI=2TO024: CURSORO, І: PRINT "RRR " 
: БРАСЕ$Ф (27) ; " ШШШ": : NE X T 

1030 POKESFFFF, 7:FORI=2TO24: CURSORS, I: U 
SR( ФЕВ00) : NEXT 

1040 РОКЕФҒҒҒҒ,6:ҒОКІ-27024: CURSUR さ さ 。 I: 
USR ( $F800) : NEXT 

1050 IFSTTHENCURSUR17。5: PRINT "Ей ЛД 

1055 IFSTTHENCURSOR6s 20: PRINT"ROADL INE 

Made bu Puck.1983": IFST=1THENST=O 

1080 CURSOR16;. 10: PRINT"READY! ! 

1070 FOKESFFFF,5:FORIZOTO4: FORJ-2T024:C 
URSORI » J: USR ($F800) : CURSORT4+I , J: USRCSFB 
OO) t NEXT: NEXT 

1090 GOTO780 

2000 MUSIC"GSECAF DGECBGE +CAF BGEAFDGECAF 
DBF DGECGD-BG?7 

2010 FORI-1TO02000: NEXT 

2020 РКІМТСНК (5) { : 60508777 

2025 00Т79%Ғ5.5 

2030 CURSOR14,S5:PRINT"BONUS STAGE 

2040 CURSOR19;,10: PRINT"OF 

2050 CURSOR17;15: FRINT"ROUND";LE 

2060 MUSIC" *C3BA*DAGFGF *CBAEFEBAGDEDCEG 
+CS": T=300: H=0 

2070 POKESFFFF,O:FORI-1TO2000: NEXT 

2075 CURSORS33,O0:PRINT" TIME 

2076 CURSORS3,.1:PRINT" зоо 

2080 PRINTCHR$(4)::0UT3$F5, 2: GOSUB?200 

2090 PRINTCHR$(6)3::0UT3$F5.6 

2100 CURSOR10,10:PRINT"YOU CATCHED" 
MUSIC" C3EGFEDCFAGFE 


2120 CURSOR20, 12: PRINTH; " HEART"; : IFH> 1 
THENFRINT"S" 

2130 MUSIC"CEGFEDFCFDFR 
2140 CURSOR10; 15: PRINT" 
2150 MUSIC"CS3EGFEDCFAGFE 
2160 CURSOR2O, 17: PRINTHX*100; 
2170 SC-SC-H*100: GOSUBBOO 
2180 MUSIC"CSEGFEDEDCECR 
2190 FORI-1TO2000: NEXT: PRINTCHR$(4)::QU 
T9$F5.4 

2200 LE-LE-*1:GOTOSO 

ООО GOSUE777:PRINTCHRS (6); 

3005 OUT3$F5.7 

5010 РОКЕФҒҒҒЕ, 10 

3015 GRAFHI3:FORI-OTO312STEFPB: LINEI, 24, 
155,100: NEXT 

3016 GETA$: IFA$«»""GOTOSSOO 

3020 M$="++++ キナ オナ ++++ +++ 

+ + ++++":CU=Z: 605082400 

TOO M$="+ + + + + + + + + 

++ + + "sCU=4: 605085400 

5040 M$="++++ + + ++++ + + + 

++ + +++ "ICU-5: 5605085400 

3050 М%=" ++ + + + Ф + + + 

+ ++ + "zCU=6:G0SUBZ400 
ZO&50 M$="+ ++ ++++ + + +++ 
+ + ++++'":CU=7: GOSUB3400 
5070 GETA$: IFA$:»""GOTO3S5OO 
3080 БКАРНІ1: ҒОКІ=0Тт05125ТЕРВ:і ІМЕІ, 4, 
155.100: NEXT 

3085 FORI-1TO100:GETA$: IFA$:»""GOTO3500 
3086 NEXT 

CURSORZO,9:FRINT"1983 Puck. 


BONUS 


" PDINTS" 


++++ ++++ 


: FORI=1 TO3OO: BETAS: IFA$<> ""GOTO3500 
3096 NEXT 

3100 
:PRINT" --- CAOCE (You) 

3110 FORI-1T0200: BETAS: IFAS<> " "BOTO3S00 
5111 NEXT à 

3120 CURSOR10, 15: POKESFFFF , 1: USR($F800) 
:PRINT" --- TORPLE 

3130 ҒОКІ=1Т0200: BETAS: IFA$«» ""GOTO3500 
3131 NEXT , 

3140 CURSOR10, 17:POKESFFFF , 2: USR( $FBOO) 
:PRINT" --- FLOUR 

2150 FORI-1TO200:GETA$: IFA$«» ""GOTO3500 
3151 NEXT 

3160 CURSOR10, 19: POKESFFFF » 3: USR ( $FBOO) 
:PRINT" --- ESUCH 

3170 FORI-1TO200: ВЕТАФ: IFA$«» " "GOTO3500 
2171 NEXT 

3180 CURSOR10+21:POKESFFFF » 4: USR( $F800) 
:PRINT" --- RALEX 

3190 FORI-iTO300:GETA$: IFA$«» ""GOTO3S00 
3191 NEXT 

3200 CURSOR20,.24:PRINT"Made bu Риск. 198 
3*1 
3210 FORI-1TOS00:GETA$: IFA$«» " "BOTO3500 
3211 NEXT 

3220 GOSUB777:PRINTCHRS (6) : : GOSUB6900 
2250 FORI-1TO1000:GETA$: ІҒАФ<> ""GOTO350 
0 
3235 
3240 
3399 END 

3400 FORI-1TOZ9:IFMIDS$(M$, 1,1) 
URSORI-1. CU: USR( $F800) 

3410 NEXT ` 

3420 MUSIC" +#BO+B+#A+A+#G+G+#F +F +E+#D+D 
+#C+C" : RETURN 

3500 GOSUB777: PRINTCHRS ( 6) § 

3510 GOSUB&900 

3520 REM ワー 2/*^a^ZBOB/BASIC/ f ൭-൭ 
3530 CURSORO, 17: PRINT" BONUS САОСЕ 
FOR";UP;" PTS. 
3540 PRINT" 

3550 PRINT" 

3560 PRINT" 

3565 PRINT"ELEFT 
3570 PRINT" 

3580 PRINT" 

3590 PRINT" 

3595 FORI-1TO20 
5600 CURSOR25,20:PRINT"PUSH [S] 

3610 CURSOR3O,22:PRINT"TO ° 

3420 FORJ=1TO100: GETAS: IFA$="S"GOTO3900 
3630 NEXT 

3640 CURSOR25,20:PRINT"PUSH ( 2 

3650 CURSOR3O,22:PRINT"TO START" 

2660 ҒОКЈ=1Т0100: GETAS: IFA$-"S"GOTO3900 
3670 NEXT 

3680 NEXT:G0TO3000 

2900 PRINTCHRS (6) : : OUT9$FS, 4: RETURN 
5000 MUSIC"CO+CRC+CRC+CR" : GRAPHI2 


NEXT 
GOTO3000 


="+"ТНЕМС 


ғ” nen 
141 16| 

し за / ни 

or 121 оғ RIGHT2 
“егі ано Uman 

| 11 FOR- ІЗІ 

— WARD"; 


PRESEN 


CURSOR10, 13: POKESFFFF , O: USR ($F800) ~ 


5005 OUT3$F4,0 
5010 FORI=1T040 
5020 LINEAXB-*4,52,0X*8-28B*RND( 1?) #64. 20*R 
ND (1) ж54 
5030 MUSICMID$("CBDAEGDACBDAEGDACBDAEGD 
ACBDAEGDABAGFEDCD",I;,1):NEXT 
FORI-Z1TO2OOO: NEXT 
МС-МС-1:ІҒМС>0605МВ1000: 6507060 
РКІМТСНКФ(6) 
GOSUB777 
OUT3$F5,2:CURSORO, 10 
PRINTY masan K wama, B uas pas だ てこ ) rey p. 
6020 PRINT" 1-- FI | 


LEM [^W 


a 


6030 PRINT" 

bow 1 

6040 PRINT" 

E P 

6050 PRINT" 

に ーー ニー し ы 

6060 CURSDR20,24:PRINT"Made By Риск „Ша 
"s CHR$ (5) 

5070 MUSIC"E2DCGFEBAG+D+CB+C4G#DC5 

4090 PRINTCHR$(&); ® . 

5095 OUT3$F5,7:G60SUB6900 

8100 IFSC<HS (4) THENFORI=1 TO3000: NEXT: GO 
тозо ; 

6110 RA=4 

6120 FORI=3TOOSTEP-1: IFHS( 1) <=SCTHENRA= 
I:HS(I+1)=HS(I):HS$%$(I+1)=HS$(I):HR(I+1)= 
HR< I) :NEXT:GOT06140 

6130 MU$-"EGRGAGEGABRBAGFEFDDEFGABECDEF 
GAREGRGAGEGABRBAGFEFFGGAABBCEGECRCC" : GOT 
06150 

6140 MU$-"CEGEFDGGCEGEFDGRAGFCGFECEDCGE 
DGRCEGEF DGGCEGEF DGRBBAGE DCAGFEAE DCRCCDEF 
GEDDDGFCDEREEF GAGFEGFEDCEGRAAAABAGFFFFFG 
FEDEEEEDEFGAAGGEDCR 

6150 SF-1:NA$-2"":M-27:4-2210:MU-O 

6160 FORI-1TO2000: NEXT: HSS (RA) = "DLS" +С 
HRS (30) + МШЗ": НБ (RA) -SC: HR (RA) SLE: MUSIC 
"R2": 605085900 

6170 CURSOR1 2, 18: PRINT" 
6180 PRINTTAB(12); " 
6190 PRINTTAB(12) § " 
6200 IF(LEN(NA$) =3) + (W» 200) THENFORI=1TO 
20: NEXT: BODTD62BO 

GETA$ 
IFA$- 


lsi deg 


"4" THENM=M- 1: W=50: IFM--1THENM ` 
IFAS=" 6" THENM=M+1 : W=50: IFM-28THENM 


М%=СНКФ (M+65) 

IFM-26THENM$-" " 
IFM-27THENM$-", " 
CURSORLEN (NA$) *5*14,19: PRINTM$; 
IF(A$-" ")XSFGOTO6300 

IFA$<>" "THENSF-1 

MU=MU+ 1 : IFMU»LEN(MU$) THENMU- 1 
МОЅІСМІр% (МОФ, MU, 1) 

W-W-1: IFW-OGOTO6800 

GOTO6200 
CURSORLEN( NAS) X#S+1 3, 18: PRINT "+++ 
CURSORLEN(NA$) K5*13, 19: PRINT "+"; МФ 


6295 
6500 
6310 
PUE 
6320 
6325 
үз. 
6530 


CURSORLEN(NA$) #S+13, 20: PRINT "+ 
CURSOR30, RAX2+7: PRINTNAS+MS; " 


NA$=NA$+M$: SF=0: M-27:W-50: GOTO6280 
6800 HS$(RA)-LEFT$(NA$*M$-"...". 3) 
6810 CURSORZO,RAX*2*7:PRINTHS$(RA);" 
"3 :FORI-1TQ3OOO: NEXT 
6820 GOTO3O 
6900 РКІМТСНКФ (5) : PRINTTAB(14) ; "HIGH-SC 
ORES! " 
6910 PRINT:PRINT" айз 
фии шз 
6920 FORI-OTO04: CURSOR6 , 1Ж%2%7:РКІМТІЗ1;М 
ID$("stndrdthth".IK2*1.2); 
6930 PRINTSPACE$(9-LEN(GSTR$(HSCI))))$:HS 
(I); 
6940 PRINTSPACES$ ( 6-LEN(STRS(HR(I))))3HR 
(1); 
6950 
) 
6960 
6970 
9000 
9010 
9020 


PRINT" "SLEFTS(HSS(I)+" "39 
FORJ-1TO100: NEXTJ, I 

RETURN 

REM MACHINE Sub. 

REM 0 CAOCE 712 

REM 1 JURFLE .. 77൫ 

9050 REM 2 FLOUR フロ アー 

9040 КЕМ 3 ESUCH Iv 

9050 КЕМ 4 RALEY うし ゅ ワズ 
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Е7СО ОО 
F7DO CO 
F7EO OO 
F7FO ОО 
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ҒВСО 7E 
FBDO 11 
ЕВЕО S6 
FBFO 52 


ം d 難し を うた 2. を な экш се aS a REDI LIO CT ん だ か が … 
THEY し て 2 で 割っ た みたい し ー す ラサ ラサ 


Q 


MZ-BOB-G RAMI, (п) 


BASIC 


この ゲー ム は ,MZ ユ ー ザ ー の 友人 が 持っ 
て いた ゴル フ を 移植 ・ 改 良し た も の で す . 
コー ス は キャ ラク タ で リア ル さ に 欠け ま 
TH, ボー ル の 描く 放物線 や バウ ンド , Ж 
化 に 富ん だ 18 ホ ー ル な ど で , 面白 く な っ て 
いる と 思い ます . 
較 プ ログ ラム ・ イ ン フ ォ メ ーション 


コー ス が 2 段 表 示 に な っ て いる 所 
は よく 〈 く 考え て いる と 思い ます .(O) 


+С» БАКТЫ OREN EID 
り ま せん が , リス ト を よく 見 て 間違い の な 
あう に 入力 し て 《 だ る ん 


RUN す る と , まず タイ トル と 説明 が 表示 
ah, その 後 何 か 好 き な キ ー を 押す と ょ と ゲー 
ム が スタ ー ト し ます . 

この ゲー ム 中 で 使え る クラ ブ は , ウッ ド 


2 本 (W1, W3), アイ アン 4 本 (13, I5, 
17, 19), ピッ チン グ (PW), サン ドウ ェ ッ 
Z(SW), マター (グリ ー ン 上 の み ) だ け 
С, 各 ク ラブ の 飛 距 離 は 図 を 見 て くだ きる 
с, な お , これ は 無風 時 で の 最大 飛 距離 で 
す . 

ゲー ム が スタ ダ タート する と 。 まず “クラブ 

^2" と 聞い て くる の で , W1 の よう に 
使う クラ ブ を 入力 し て くだ さき さい. 

する と 次 に “ホウ コウ ғ?” と 聞い て 
くる の て で て, R (Ж), L ( 左 ) を 入力 する と, 
204%, カカ の バー が 伸び 縮み する の で 適当 な 
と ころ で [SPACE | キー を 押す と ボー ル が 飛 
ん で 行き š +. 

を そして, 以上 の 操作 を 繰り 返し て ボー ル 
が グリ ー ン の 上 に 載る と 拡大 きれ た グリ ー 
ン 上 の 画面 に な り , クラ グ は 自動 的 に パタ 
ー が 設定 され る の で ボー ル を 打つ 方 向 か ら 
入力 し て くだ さい . この と とき, 力 の バー の 


つう も っ か よい すこ と で こ ン か E 


長き る は, ボー ル と カッ プ ' の 長き 分 で | SPACE | 


キー を 押し て くだ きい . みごと カッ プ ・ イ 


ン す る と , 今 ま で の 結果 が 表示 る れ ま す . 


る バン カー 

ここ に 入る と , ポー ル は 止ま り 次 の クラ 
プ は 自動 的 に サンドウ エッ ジ に な り ま す . 
e 池 

1 打 プ ラス さる 
動き れ ま す . 
ek 

ボー ル の スピ ー ド が 小さ きく なり,1/2 の 確 
率 で は ね 返り ます . 
eoB 

247Т%7//74--5й, 
打ち 直し で す . 

ここ は ぜったい に バー 狙い 


зі, ボー ル は 池 の 左 端 へ 移 


も と の 場所 から 


⑨ 必 殺 後 ろ 打 ち 


この ゲー ム の 風 が と て も 強く 影響 する こ 
と を 利用 し た 技 で す . | 
風 が 5m/s 以 上 の 追い 風 で , 最小 の カ で 打 
っ て も グリ ー ン を 越え そう だ と 思っ た だ たら, 
風 上 に 向け て 力 を 半分 以下 で 打っ て くだ る 
RST UT, 
@OB& オン 

グリ ー ン で バウ ンド し だ た ボール が 。 その 
後 地面 に 着 か ず に OB に な る と 2 打 プ ラス さる 
れ ま す が 。 グリ ー ン に 載っ て いま す . 
スー バー ショ ッ ト 

これ は 狙っ て で きる も の で は な く , 1 番 


し て で きだ イラ スト が に な っ だ た の は いう まで も な い . 


IL ЕШР . 


ウッ ド で 打つ と き に 1 の 確 3 XCHENP 


約 1.5 倍 の スー パー ウッ ド に な る も の で す . 


リナ ン パ バー し て あり ,REM 文 も 入力 し な 
く て よい と いう 親切 ゲロ グラ ム で す . 

まだ た だ, G-RAM が 1 枚 か 2 枚 か は 自動 的 
に 判別 (2 枚 の 人 は , より スピ ー デ ィ ー に 
ゲー ム が 進行 し ます ) し ます し , DATA X 
の 内 容 を 変え た る こと に よっ て , あな だ だ け 
の New コ ユース が で きま す . 


この ブロ グラ ム は , MZ-12002° G MZ- 80 


-B へ の 移植 し と いい な が ら ,。 プリ ンタ が ない 


の で 友達 の 家 で リス ト を 紙 に 書き 写し , Z 
れ を 持ち 帰っ つて 作っ だ も の で , と て も 疲れ 
だ NOT LTS: 

C^, アプ ギド ギ ベ シン チャ ー す ご みろ み ぐ 。 WICS 
用 リア ル 戦 車 戦 の 2 本 を 作っ て いま す の で 
期待 し て いて くだ さい. 
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OLM <=: PERENNE 
REM NENNEN CHAMPION GOLF V.1.2 HN 
REM ШЕШШ Date 1984, 9,25 (SUN) ШШ 
REM MN For MZ-80B + G.RAM 1 ШШ 
REM 

REM NENNEN 

REM ШШШ E AC E 
КЕМ ШЕННЕН 

КЕМ 

10 РОКЕФҒҒҒҒ, 100 
20 HI-FEEK($FFFF) 
50 GRAPH I1,C,I2,C,00:SET O,0:MO-0: IF Р 


MAZIN 
Original No.4 


JONTURUN= 


ОІМТ (0,0) =2 THEN GR=2: MO=1 : GRAPH C:GOSUB 


1600: 100൭0 

40 CONSOLE C40, SO, 24,N! TEMPO 7 

50 RESTORE 

60 BAS -CHR$ ($60) «CHR$ (SFO) +CHRS (SFO) «CH 
КФ ($60) : CL$-STRINGS$(CHR$(O),4) 

70 GOSUB 1390 

80 P=Os DINM 5С(18).РА(18) 

90 р=25:5С=1:0=0:Х=1:ү=25 . 

100 READ РА,Н1%Ф, Н2%,Н5%Ф, H4$ 

110 REM +++ X4» 上 ルー キン 

120 PRINT CHR$ (2) :Р=Р+1 : GRAPH 11С01 

150 CURSOR 0,1:PRINT " HOLE NO.":STR$( 
E Um PAR ";PA E! 

140 GOSUB 1090 

150 CURSOR 0,14:РКІМТ Н2% 

160 CURSOR O.23:PRINT H4$ 

170 CURSOR O,21*PRINT H3$ 

180 CURSOR O。12:FRINT H1$:POSITION X*4。 
Y*4: PATTERN -4.ВА% I 

190 REM ¥ ダナ へ" "f പമ Ww VOM 1 ネー 
173 332 サイ イキ 9 

200 CURSOR 0O,2:PRINT "Э“4";5С;" оа» !!" 
:Х4-Х 

210 GOSUB 930:GO0SUB 860: GOSUR 760: GOSUB 
250 

220 IF СНАБАСТЕБФ(Х1.Ү2)-"Ш" GOSUB 1150 
230 IF 0=1 THEN SC(P)=SC:PA(P) =PA: GOSUB 

1580: GOTO 90 

240 GOTO 170 

250 CURSOR O,3:PRINT"7?42 »awh !!":SC-SC 


B=B+( (20-Е) /3) 

C=CK(E/20) -(R/30) А 

IF К>з2 THEN K=0: RETURN 

FOR I-O TO 20 

Az(20*I-I^2) /B 

POSITION XX*4,YX4:PATTERN -4,CL $ 
YzD-A: X=X+C 

IF (X278?) *(D-43) THEN X=X4: Y=D: ОТО 


IF (X>7 日 )*(D=25) THEN D=433X=0 

IF P210 THEN СОКЅОК20, 1 

IF P»10 THEN PRINTTAB(20) i 

IF (Х<0) *(D=25) THEN X=X4: Y=D:GOTO 


IF (X<O) *(D=4 さ ) THEND-25: X778 
POSITIONXX4, ҮЖ4: PATTERN-4, BA を 
5070420 
CURSORO,3:PRINT"OB #*"Z മഴ 
MUSIC "EE":K-2:SC-SC«2:GO0TO 280 
NEXT I Ё 1 
B=B+8: C=C/3: MUSIC "-С1" 

| X1=INT(X/2):Y1=INT(D/2) 
Y2=Y1+1:X2=X1+1:XZ=X1-1 
IF Х2>29 THEN Х2-29 
IF X3«0 THEN X さ =O 
IF СНАБКАСТЕНФ%(Х1,Ү2)-"“" 60508590 
IF СНАКАСТЕНФ%(Х1,Ү2)-"т" GOSUB 520 
IF (CHARACTERS ( X2, Y1) 2") + (CHARACT 

ER$(XZ,Y1)="&") GOSUB710 
KzK*1:GOTO 280 
REM +++ ハハ "カー 
CURSOR 0,3:PRINT " 
MUSIC "-CO-C-D2-CO" 
CURSORO,S:PRINT "737° л SW ":Bz8:C 


n25-"2t -" 


CURSOR O,2:PRINT " ^?"4";SC;i"5" А" 
GOSUB 870:GOSUB 770:GOSUB 250:RETUR 


REM +++ イケ 
CURSOR O,3:PRINT " イケ 9^2! 
MUSIC "+BO+C1CO" 
SC=SC+1 
POSITION X*4,Y*4:PATTERN -4,CL$:MUS 
" RO " 
640 X=X-0. 25 
650 POSITION X*4,Y*4:PATTERN -4, BAS: MUS 
IC " RO" 
660 IF CHARACTERS (X/2+0. 5, Y/241) O "a" ദ 
OTO 680 
GOTO 430 2 
IF CHARACTERS (X/2, Y/2+1)="~" GOTO 6 


K=3: RETURN 

REM +++ * 

CURSOR O,Z:PRINT " を ғу! 

MUSIC "+#B1++G2RO" 
B-B4B:C-C/1.5 

IF RND(1)<.5 THEN С--С 

RETURN | 

REM +++ POWER 

E=O 

CURSOR O。4:PRINT STRINB$(" ",40) 
CURSOR E, 4:PRINT "Ш " 

GET B$:IF B$=" “ THEN MUSIC"+#BO+#B 


| +#B":GOTO 850 


IF Е>19 THEN F=-1 

IF Е<1 THEN F=1 

Е=Е+Е 

GOTO 790 

RETURN 

REM +++ INPUT ഈ 

CURSOR O,6:PRINT "RIT n? "$iCHR$(4 
GET H$:IF (H$4»"R")X(H$z»"L") GOTO 


PRINT H$ 
IF H$-"L" THEN C--C: RETURN 
IF H$-"R" THEN С=С: RETURN 
GOTO 870 
REM +++ INPUT 757" 
CURSOR O,S:PRINT"752" л? 
) ; CHR ま (人 4) $ 
950 kU$="": FOR 1150 TO 1 
960 GET K1$:IF K1$-"" GOTO 960 
970 PRINT К1%::К(0Ф-К(%%К1%:МЕХТ 
980 IF (KU$-"W1")X(RND(1)».99) THEN В=1 


"3 CHR ま (4 


_1.5:C=4: CURSOR O。 さ :FRTNT "Ба" : MU 


SIC "+AQR+#AR+BR+#B":RETURN 
990 IF KU$-"Wi" THEN B=12:C=3:RETURN 
1000 KU$-"WZ" THEN B=11:C=2: RETURN 
1010 KU$-"IZ" THEN B=10:C=1.6:RETURN 
1020 KU$-"IS" THEN В=9.5:С=1. 4: КЕТИК 
N 
1020 KU$-"I7" THEN B=9. 3:C=1.2:RETUR 
ey 
1040 KU$-"I9" THEN B=9: C=1: RETURN 
1050 KU$-"SW" THEN B=9:C=.5: RETURN 
1060 IF KU$-"PW" THEN B-9.5:C-.3:RETURN 
1070 { 
1080 REM +++ MIND SET 
R=INT(RND( 1 ) *20) -10 
IF R>O THEN АФ="=+° 7 
АФ= "ЬУ" у $35" 
T=ABS(R) 
CURSOR O.2:PRINT " WIND ":i4$;T;"m/ 


":GOTO 1120 


RETURN 
REM +++ "9 ト 
PRINT СНКФ (6) $P; "ホー ルル PAR ":РА:ОКАР 


CURSOR 0, 20:РКІМТ STRING$("€",40) 
R=INT(RND( 1 ) X29) +5 
CURSOR R,20:PRINT " " 
R1=INT(RND( 1 ) K30) +5 
IF (Ri=R)+(Ri=R+1) GOTO 1260 
CURSOR R1,19:PRINT "o" 
1230 CURSOR О,2:РКІМТ ടു. റ 
M "Ç" 
1240 ൧൭൮: 3059൮8 860:GOSUB 760 
1250 FOR 1=0 TO E 
1260 CURSORR 1,19:PRINT " " 
1270 R1=R1+C ` 
1280 IF Кі<1 THEN I-E:R1-1:MUSIC "EE" 
1290 IF R1339 THEN I=E:R1=39:MUSIC "EE" 
1300 CURSOR R1,19:PRINT "O":USR($0F22) 
1310 FOR К=0 TO 1ж40: МЕХТ К 
1320 NEXT I 
1330 IF (R1=R)+(R1=R+1) THEN 0=1 : CURSOR 
К1,19:РКІМТ " “SPRINT TAB(R1);"0"$ : MUS 
IC "+B1R7+E1R6+B1R4+E1R+E1R+E1R+B1R" : КЕТ 
URN- 
1340 SC=SC+1 
1350 GOTO 1230 
1360 CURSOR О, 2: РКІМТ " DANS GRE: 
USIC "*KB9":SC-SC-1 
1270 GOTO 1520 
1280 REM +++ ヲイ トル 
1290 PRINTCHRS (6) 5 


1400. PRINTS гүү TET TENT 


кы £ cae 2. 3 кеч 
1410 FRINT " | 
ЛИГ? 
1420 PRINT " 
لا لا ل‎ دا١‎ 
1430 PRINT " * ? 2 ET ЖД 
Ж A 2":PRINT:PRINT 
1440 FRINT " 18 ホー ル РАК 72 മം 
RINT 
1450 FRINT " 757^ —r Wi Ws" 
1460 PRINT " TST STF qq" 
1470 PRINT " т“ БЫ PW PTET Y- 
っ 9"5":PRINT:PRINT | 
1480 PRINT " Е. 
PROGRAMED" : PRINT 
1490 FRINT " Sm ----- BUNKER 
BY":PRINT 
1500 PRINT " 
"ҮТ ЖУУРАТ 
1510 PRINT TAE(2 さ )』" ト ヒート EI 
1520 PRINT " レニ ニニ ニコ TREE 
لا لال دل‎ ١ 
1530 PRINT TAB(3S5);"?5"5" 
1540 PRINT " R27 = CR] or СЕЈ" 
1550 PRINT " ショ ッ ト —— mas" 
1560 GET GE$:IF GE$-"" THEN R-RND(1):GO 
TO 1560 
1570 RETURN 


ト ゴ オト エゴ エロ ロト エー I 


لادلا LL LL‏ لد الا 


GREEN 


grt 一 一 一 POND 


1580 PRINT CHR$(6)::GRAPH 11,С, 00: MUSIC 


" RO "K" 
1590 IF GR=2 THEN GRAFH 02:GOTO 1650 
1600 LINE Z19,0,319,151,O,151,0,O:LINE 
159, 0,159, 151:LINE 16,0,16,151:11ІМЕ 175, 
0,175,151:LINE 56,0,56;151:LINE 216,0,21 
65,151 


1610 FOR L-O TO 9:LINE O.L*16*7.319,L*1 


6%7:МЕХТ 

1620 FOR LX=7 TO 27 STEP 20:ҒОК L-1 ТО 
9:LINE (LX=7) ネー16+(LX= ニ 27 ) &-176, LK16-1; (L 
X27)*-159*(LX-227) X*-319,LX16-1: NEXT し 。LX 

1430 IF MO=1 THEN RETURN 

1640 GRAPH 01. 


1650 PRINT "Ша T NN ON NN CON 21:08 | 


ng 

1660 IF GR=2 THEN MUSIC "RSRO" 

1670 FOR L=1 ТОР 

1680 IF L-10 THEN CURSORZOs 1 

1690 IF L>10 THEN PRINTTAB(20); 

1700 PRINT " "gs STRS(PACL)); " ы; 
SRIGHTS(" "*STR$(SC(L)),2) 

1710 IF L>? THEN PRINT TAB(2O) ഃ 

1720 M$z"xxxxx ^2 9° ネェ ~~ |": М1$="-С" 


1730 IF SC(L) く さ THEN M$-"8 LEM Il 
1 1211 $=" +HBR+BR" 

1740 IF SC(L)-PA(L)-2 THEN МФ-"оо < 
4-7  >":М1$="+6" 

1750 IF SC(L)=PA(L)—-1 THEN МФ-"о < 
М"-374- >":М1$="+Е" 

1760 IF SC(L) PA(L) THEN M$="+ € 
n — )"IMI$2"B" ^" jos 

1770 IF SC(L) -PA(L)*1 THEN M$-"x г 
Ж“ *"— 1"%М1%="С" | ( 

1780.IF SC(LI=PA(L)+2 THEN M ま ="xx г 


D. 5 0”... 1":M1$z"-A" 

1790 IF SC(L)=PA(L)+Z THEN М%="ххх C 
Т.Я%-- 1":М1%="-Е" 

1800 IF SC(L)=1 THEN Ms= "eees om RE 
UI" :M1$="+G+A+B+#B" 

1810 PRINT RIGHT$(" "-STR$(UD ,2) 5M$ 
21820 FOR Ісі TO 5:MUSIC M1$:NEXT: MUSIC 
"RO" 

1830 NEXT L 

1840 PA=0: SC=0 7 

1850 ҒОК 1=1 ТОР 

1860 PA=PA+PA(1) 

1870 SC-SC*SC(I) 

1880 NEXT I 

1890 CURSOR 1;,19:PRINT Ps "ホー ルル »23^7?'7a^?." 

1900 PRINT " PAR = "РА 

1910 PRINT " %94; 27 = "SCI" ú 
അരി = "ІНІ 

1920 IF SC>FA THEN A$-" オー" -":GOTO 195 


1940 A$="" 

1950 TD-ABS(SC-PA) 

1960 PRINT " "272 セイ セキ = "ITDIAS 
1970 IF Р=18 GOTO 2020 

1980 k=0 

1990 PRINT " Push any key" 
2000 GET A$:IF A$-"" GOTO 2000 
2010 RETURN 

2020 IF SC«HI THEN HI=SC 

2030 PRINT "EDEMA" HIS 

2040 РОКЕФҒҒҒҒ,НІ Y 

2050 GET A$:R=RND(1):IF А%="" GOTO 2050 
2060 CLR:GOTO 20 


2070 БЕМ No.1 HOLE 
2080 DATAS," Acte жал 
ж." 

2090 DTI 
НАННЕ" 

" ججج ججج рата"‏ 2100 

2110 ПОТА ^ n^ ^ ^ ERE 
ആഈ. ഞ്ഞ " 

2120 КЕМ Мо.2 HOLE 

2130 DATA4," പില്‍ 


2140 DATA ННН 


レン ーー ドー 
2150 DATA" 5 ここ ここ 
1 
തടന്ന" 
2170 КЕМ No.3 HOLE 


2180 DATAZ, "Жжымымыныммымы ымы" 
2190 DATA " HSS rr SURE 
2200 DATA"" 

2210 РАТА ИНЕ УУ no ne nu л n MUERE NEUE 
2220 REM No.4 HOLE —— 

2230 DATAS," Eon 

FARRAR 

2240 DATA "ENEMIES mmr rE 
оаа" 


2250 DATA" 
2260 DATA ത്യ പതഞ്ഞ 


トニ ここ ここ 、 
Жа" 


2270 КЕМ No. 5 HOLE 

2280 DATA4," жж жы 
жа" 

2290 DAT A RIRS ~~ ~~ തത്തി 


\ ' 
2310 DATA “SRS COGNI EEUU 
^ 


2300 DATA" 


2320 REM No.6 HOLE 
2330 DATAS," / AAA 
eee 


2240 DATA" aptae om MEO NR 


ER à 
2350 DATA" + + + + 


編集 部 の 方 に お ね が い が あ り ま す . X1 の リス ト に つい Ре, 80 ヶ タ く らい に し て 《 く だ きい . ന്‌ くい / 


A dus よかっ た ノ 


・ 使っ て Ж). 


PE ッ ピ ー は 


1920 IF SC<PA THEN A$-" 729° -": БОТО 195 


2260 DATA "тт н ~ ~~ ~~ mm 


EE 
2370 REM No.7 HOLE 
2580 DATA4," жж 
жа” 
EAA 


2400 рата" Ж“. し ここ 、 、 + 


2410 DATA" ZE~ ~ BSS to 
2420 REM — No.8 HOLE 

2430 DATAZ," жаға а #4" 
2440 DATA" Pe r ~~ 7. 5 — —] 


2450 DATA" А deboli ^ 
2460 DATA" 
2470 REM No. 9 HOLE 

2480 DATAS, " ж.а ക 


" 


2490 DATA ИНИНИ ~ ч ч НОВИНИ 


ә ааа а 
2500 DATA" а 
ж" 
2510 РАТА "~" SSE rrr EORR NUN 


2520 КЕМ = No.10 HOLE 
25:0 DATA4," 
ж "n 
2540 DATA" E r r r rnnr 


мын м 


YO 35224 “ 
2550 DATA "Rk Soie e ここ 
എംഎം 


2560 DATA "FREE CNN QUIE തന 
2570 КЕМ 


2580 DATAZ, " 
^ s 


No.11 HOLE 


Ec 

A കു 

ot を tu Ped. wis ` 5 
CN fon He ә / 
Таса АУАСЫ പ്‌ 

NR АКО 


"g A А . കടം ^ て 
ы ЗУ ышы d, GRECE. 
ച്‌്‌ ТЫ പ്‌ 


2590 DATA" 
25 
2600 DATA" 
ニニ ニン 
2610 DATA" ро а араатан 
അരെ " 
2620 КЕМ 
2630 DATAS." 
La dili эз" 
мм 


2650 DATA" M^ 
AMAA C 

2660 DATA "rT ЕККЕН гг ^ 

ആരടാ 


Ersoy 


No.12 HOLE 
جج‎ жа جج‎ ла эл 


2670 КЕМ No.13 HDLE 
2680 DATA3," ж 
< 
2690 DATA" WS v nv nu e nu nv ум ЕВЕ u 
~" 
2700 DATA" S 


2710 DATA "ESSE Tr RENEE 
Бра а 


2720 КЕМ No.14 HOLE 
2730. DATA4, " ж.а 

ғ." 
2740 DATA" PSESE REET 


2750 DATA" f ^ So л 
2760 DATA ЕНЕ — ^ ^at Siwi SRS 
Ir " 

2770 REM 
2780 DATA4," 
2790 DATA "WEEE SIRO qot: ~ ~ — | 
Шт ден" 

2800 DATA" ж. 


Мо.15 HOLE 
conn 


4 4 жй. у % 
൬൭൪ . 25 で まま っ A АШ 
Ӯ: T 


と 


pO 


CHAMPION GOLF BASIC リ スト 


2810 DATA" ттгтгтттт 5 ~ л, лу л, л, л, лу лу лу лу лу лу т. 


Ммм м л М м кл ” 


2820 КЕМ No.16 HOLE - 
2830 DATAS." o * 


ここ ここ ここ ここ ここ 


2840 DATA "SSNS С mn 


2850 DATA" а а а Ф * . 
Ел " 

2860 DATA" SSE ~~ ST mT RE 
E " 


~~ 


2870 REM No.17 HOLE 
2880 DATAZ," Moe жа 

ж" й 
2890 DATA" 


പപ; 


2900 рата" 


2910 DATA "dE onere л, лу лу лу лу лу nm Л тел ы Л у бы тол, ы Л лы л Pm 


мемен еме 


2920 КЕМ No.18 HOLE 
2950 DATAS," ^ 
a" 
2940 РАТА" ~~~ лл, л, л, л, л, ле лу лу у бы the лы NN RE 


ここ ここ ここ 、 


2950 DATA" Fk 
эел Фе" 

2960 DATA "ИМЕК НГ SEEN E 
ЕР Иінгтгтгтт " 


2970 КЕМ Finished typing this program. 
2980 REM Lets play “CHAMPION GOLF”, 
2990 КЕМ Мы name is Y.Okada . 

3000 REM 

5010 КЕМ Мы Hi-Score 75 (2 over) 
5020 REM Hole In One 11, 13 Hole 
5030 REM اأ‎ 


5040 END 


で 平川 英樹 


«Н-200 


BASIC+7Y УЕН 


РІО PiOn 


ここ は ぜん らく ビル の 9F の 905 号室 . 
本 来 な ら ば 空き 部 屋 な の だ が , 昼休み に な 
$t, 5F か ら ビ ピオ 君 と DAN BPN NPT 
ЖС 人 遊び の ワン ダー タラ ンド“ と 化す …。 


画 プ ログ ラム ・ イ ン フ ォ メ ーション 


BASIC 
マシ ン 語 2000--3821 


まず 。 リ スト 1 (BASIC) を 入力 し て セ 
_ £4. BASIC は , や た ら と USR や 


РЕЕК, POKE を 
7) 


と 連発 し て い 
AZT LS 0. E. 
次 に 。 リス ト 2 (マシ ン 語 : $2000~$3B 


フェ ーッ , 結局 当たっ て な いや 


る の で , А 


100 REM 333 9 4€ E € € 9€ жы. 
110 REM ж 
120 REM * 
150 REM ж 
140 КЕМ ж 
150 КЕМ ж 
160 REM еккен 3C € € € E NINH 

170 CLEAR $1FFF:H-2500 :CLS:A=USR ($3020): 
POKE 0,0:РОКЕ $CA00,4 I 
1180 A=USR($2C1F):POKE $7020,0:FOR U= の TO 

5:РОКЕ $7050*16*U,1:NEXT :A=USR ($3801) 
190 A=USR ($2000) : A=USR (%58Е0) :РІСК Ar IF 
A«»$73 THEN 190 

200 S=Q: POKE $7006,1 :POKE $7002 , 35: COLOR 
| 6,0:CLS 
210 A-USR(G$2CIF): A-USR ($3020) : ASUSR (まつ DB 
6) 
220 COLOR 4,0:LOCATE 1,1:PRINT "HI":LOCA 
TE 9,1:РКІМТ "SC" 
250 . A=USR ($3929) : COLOR 7,0:LOCATE Sj LPR 
INT H:LOCATE 20,1:PRINT PEEK ($7002) 


PiO PiOn For JR-2 の の 


本 本 本 * 本 


by CyoJin-Game (JUFC) 


因 が ある の だ /: 


г ж 
s47 "ОЙ 


P us 


| 字 だ っ て よ を 行き の 字 で 書い た 
、 が 夏休み だ か ら か な あぁ 。 nol 定期 テス ト の ころ を 見 は か ら っ て PiOPiO に 出 そ う . 
無事 ざん らく iuis ria Nk た の だ ろう か .。 も AER ac nid な っ な の で は な い の か が ? 


dad un As Фуу) 2% КОЛУ: v ма തി 


ピオ ・ ピ オン 


2) を モニ タ で 入力 し ,。 РіО '844 7 月 号 か 
11 月 号 に 載っ た チェック サム ・ プ ログ ラ 
ム で 間違い が な いか を 確認 し ます . そ し て , 
先 に モー し た BASIC 部 の すぐ 後に モー 
TURT: 

次 回 か ら は LOAD : MLOAD : RUN [RET 


өз ム が スタ ー ト し ます . 
> . А: r E: 


"n 8. [eim] で 左右 移動 , [SPACE| キ 
ー で ピー ム 発射 , [Z キー で ジャ ンプ し て ピ 
オォ 君 を 操り ます . 

id, UBD (未確認 バウ ンド 物体 ダン ) 
が 登場 し , 跳ね 回 りな が ら ビ ピオ 君 を つぶ る を 
うと し まず 。 TST, = тле 
し て くだ る さい. する と UBD は 分 裂 し て 2 匹 
の DAN に な り ま す . こ れれ 6 跳ね 回 りな が ら 
ビオ 君 を つぶ を そう と し ます が , 同時 に Bas 
ic Egg を 落と し て きよ ます (も ちろ ん , - 
れ に も 当 だ っ て は いけ ませ ん ). 

DAN を ビー ム て で 破壊 する と , 2 個 の 放射 
性 物質 PALm に な り ま す . これ は 地上 に 着 
€ と 左右 の 端 に 逃げ て いき ます が 。 だ ま に 
ピオ に 向かっ て (る こし が あり ます 


- の と き は ジャ ング し て 和 遊 け て くだ きる 


な お , B-Egg は DAN айа Сз 
44,203. まだ 言い 忘れ まし だ が 。 
TA ら ビ ー ム に 当 だ っ て も いけ ませ 
Gs 


vh nes. 


3055 う ム に つい て 


TUNE PiO PiOn BASIC リ スト 


COLOR 7,0:LOCATE 11,1:PRINT S 
A-USR ($2000) : ASUSR ($2D13) : A-USR ($39A 


PICK А: A=USR ($3A48) 
A=USR ($3911) IF PEEK ($7020) =0 THEN P 
$7004 ,PEEK ($7006) +1: GOTO 370 
IF PEEK ($7008) < >2 THEN GOSUB 510 
IF PEEK($7174)<>0 THEN 520 
GOTO 250 
SOUND 2000,1:5-5%55:РОКЕ $7008 , 0: LOC 
11,1:PRINT S:A=USR ($2C50) : RETURN 
SOUND 500,20: РОКЕ $7002, (PEEK ($7002) 

-1):POKE $7174,0 

330 IF PEEK($7002)<>0 THEN 570 

540 LOCATE 21,1:PRINT "O":LOCATE 11,11:Р 

RINT "GAME OVER" 

350 FOR Е=@ TO 5000: МЕХТ:ІҒ S>H THEN H=S 

360 GOTO 180 6 

370 ASUSR ($2C1F) : A=USR ($3020) : A=USR ($2DB 

é) 

380 COLOR 4,0:LOCATE 1,1:PRINT "НІ" LOCA 


ゆ Pi011 月 号 を 買っ た . PiOPiO に 載る か な ぁ ? 載 れ ば いい な ぁ . 載る だ ろう ./ と 思っ て いた けど 没 で あっ た . 何故 だ ろう ? ど 
(つも り ) し , 他 の ペー ジ を 見 て も 自分 の は 劣っ て いる と も 思え な い . 
し か し それ だ け で 載る か な あぁ . ボク が 以前 出し た 手紙 | š 
ちゃ ん と ポス ト に 入れ だ か M METUS 


adde AS appo: P au eed ^ Re 


UBD な ど を 順に 動か す 
üt: 位置 の 移動 
壁 に 当たっ た と き 
バターン の 移動 
分 裂 の 処理 

ビー ム の ルー チン 
UBD の 移動 
DAN の 移動 
PALm の 移動 
ピオ 者 ルー チン 
初期 変数 設定 
初期 画面 設定 
ビー ム の 移動 
ピオ 死亡 ルー チン 
文字 定義 


UBD と DAN の 移動 は すべ て パターン 化 
きれ て いる の で 速 き は 万 全 (ちょ っ と 速い か 
な ?). し か し パタ ー ン 化 き 8 きれ て いる と は い 

‘HY TU の ルー チン も 設定 き 

れ て いる の で 決し て 簡単 な ゲー ау え 
ませ ん . 

な お , アド レス ・ マ ッ യ; 


бм 572 
@ 


— деб 
\ 


ウ wa 2» / 


これ は 上 難しい. 
作者 も 4 面 ま で 行け ませ ん . 
ム の ユ コツ は , DAN の 行動 コー ス を 読み 切る 


恥ず カ か ' し な が 
この ゲー 


tt, あま り ピ オォ オ 君 を 動き 回 ら せ な いこ 
と で すね . 


TE 9,1:PRINT "SC":LOCATE 1353,11:COLOR 6,0 
590 PRINT "READY'":FOR ചമ TO 900: NEXT: S 
OUND 1000,5:1 ОСАТЕ 15,113PRINT " 
400 GOTO 220: REM (JUFC) > (JPC) ? 
410 REM Machine area $2000-$35b21 


こ に 没 に な る 原 
や は り 手 紙 を 出し た の 


AG 


` 


М 


à | 7 . - 4 Е t 1% 
ポス ト は ニモ モノ で は な か っ た の だ ろう か …。 うー む ,。 困っ た 困っ た . PSI アニ メ も マン が も 5「 キ ャ プ テ ン 」 が 最高 だ ぜ . Р5.2 R | ‘CY 
MORN, ワー プロ で うれ し が っ て 必用 の な い 書 類 を 作ら な いで くだ さい . 昌 先 生 が お こっ て お り ま す .(but,end の 大 典 ) 000 OY DATI ERR 
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PiO の 読者 の 中 で 古い ゲー ム は つま らん な ど と GoT, 新しい ゲー ム ば か り で 遊ん で いる 人 は いま せん か ? i5. 新しい ゲー ム ば か りや っ ち 
ЖТ н: Уа аяға) FUB н нт КӨ о 4 9, プロ グラ ム を い じ くっ て 自分 や 敵 を ふやし た り LTE 
b ouo tee b s ッ ク で GAME OVER に な っ て か `6 ТӘР + を 押し て , GOTO: fi 
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b は い は 一 い , PiO10 月 号 p.54 の Tb. 吹 き の SPACE Key ん, SOLVALOU で す よ ー. い ま は マイ ナー な 吹奏 楽 部 で も いつ か は メジ ャ ー に な れ 

る よん . 

LATE T. ഷും സിലി 
3 i ロディ ー あ り が と . “ちょ る くけ Ë 


吹奏 楽 い こ 一 る 根性 / ど わん けつ り ょ く さ / 根 性 し すぎ て まう す び ぴー pret cu ich. Жажа ec ws Ad Dy ye P" | 


МІС-1 001 ҒЗКНАМ spæn: 


BACIC 十 (マシ ン 語 ) 


ポテ ト ・ 


W s 
一 稲葉 有 記 


РОТАТО PANIC 


ここ は じゃ が いも 村 の ポテ ト 畑 . 今日 も 
元気 よく 働く チッ プス 和 看 . 

「 バ サバ サー ッ 」 

また カラ ス が いも 取り に 来 た な . えい っ 
水鉄砲 発射 / ヤッ ター いも が 戻っ て きた . 
あら あら , カラ ス に 気 を 取ら れ て いた らい 
も が 干からび て きた . 今度 は じょう ろ て で て 水 
まま だ. 

あっ 水 が な く な っ て きた . KINOK SR 
AT, b. よー し 満 タ ン だ ノ 
較 プ ログ ラム ・ イ インフォメーション 


BASIC (2 本 ) 


キャ ラク タ は か わい いけ ど , アイ 
デア が イマ イチ だ っ た な . (м) 


あな た は 働き 者 の チッ プス 君 で す -。 カ 5 
ス に いも を 取ら れ な いよ うに , [Als] キ ー で 
左右 に 移動 し , [ 』:| キ ー で 水鉄砲 を 射 っ て カ 
ラス を 追い 払っ て くだ る さい. PIREK 
て 上 に 逃げ て いき ます . 

まだ ある 程度 の 時 間 が だ た つと , いも が 干 
か ら び て きま す . そ の と き は いも の 上 で [|。| 
キー を 押す と 水 を まい だ こと に な り , xo 
形 に 戻っ て いき ます . な お , 何 回 も 水 を 使 
うと し まい に は 水鉄砲 も が ボ ま きも で き な く 
な り ま す . を の 前 に 右端 へ 行っ て 水 を 補給 
た で くだ る れい 。 

この よ ょ うに し て 1 分 経過 する と 面 クリ ア 
С, 残っ て いる いも の 数 x 面 数 X100 点 の 

ー ナ ス が も ら え ,。 次 の 面 に 移り ます . 
b>, カラ ス に イモ 持っ て か れ て し も た 


チッ プス の X 座 標 
チッ プス の 消去 用 
チッ プス の 残り 
カラ ス の X 座 標 
カラ ス の Y 座 標 
カラ ス 消 去 用 
カラ ス 消 去 用 
カラ ス の 状態 
へ ビ の X 座 標 
へ ビ の カウ ント 用 


GOSUB 

第 4 初期 
チッ プス 移動 
いも 表示 用 
音楽 
カラ ス 移 動 
へ ビ 移 動 
スズ メ 移 動 
面 ク リア 判断 
ボー ナス 
水鉄砲 
水 ま き 


1 面目 は カラ ス だ け で す が 。 2 面目 か ら 
は へ ビ が 。 3 面目 以降 か ら は スズ メ が 登場 
し て きま す . そし て 4 面 。 11 面 で スズ メ が 
24], 3 羽 と 増え て いき ます . 

ToC പതം, ҒЫС 
ズ メ の ふん に 当たる と ノビ て し まい ,LEST 
が 減り ます . この LEST が 0 に な る と ゲー ム ・ 
オー パー で す 。 

m AO. 


VIC の ユー ザー な らい つも どり に 入力 


し て くだ る さい. リス ト 1 を 入力 後 モ ー グ し , 
リス ト 2 を 入力 し て か ら リ スト 1 の すぐ 後 
に セー プ し ます .。 RUN し て 動け ば 言う こ 
な し で す が 。 エラ ー が で ただ り 竣 走 し た 場合 
は 頑張 っ て 直し て くだ さい. 

動い た ら 6 思う 存 分 楽し ん で くだ さい .20, 
000 点 以上 は な か な か 難し いで す よ . 


へ ビ の 状態 

スズ メ の カウ ント 用 
いも の し ぼ む カウ ント 
いも 表示 , 消去 用 
ミス の 数 
音楽 の カウ ント 用 
水 の 量 

タイ ム 

タイ ム ・ ス トッ プ 用 
LOCATE 用 

шн! 

雑用 

雑用 
FOR ル ー プ 用 
FOR ル ー プ 用 


も 消え る 
チッ プス 倒れ る 
ゲー ム ・ オ ー バ ー 
得点 表示 etc. 
第 1 初期 
タイ トル 
タイ トル 音楽 
第 2 初期 
第 3 初期 
初期 画面 
音楽 デー タ 


es 


BASIC+ マ シン 語 で す . 特に か わっ だ た だ 
ほ は し て いま せん が 。 水 まき の 所 で 少し は 
苦労 し まし た (ぼく は 6502 の マシ ン 語 の イ 
anD “A” で らい し か 知ら な い の で ). 
マシ ン 語 が ある の で 興味 が あっ て ひま な 人 
は 研究 し て くだ きい ( 何 か の 役に立て ば 幸 
OTF). あと , 変数 表 と 行 番号 マッ プ ' を 載 
EE E Mte eR Rude 


し か も 
എംവി 
OTA TU ОЯ LT Ts ate 


語 に する と か が なり の 速 る 


Мер A 


に な っ て い だ と 想い ます 。 5l. cir 
ip PAUTAS ACA 131 
23 LENE の ん HAE ch A x CSF Mr Г] “2444175 : > 


CM 


УУК മന്‌ е» 5 EU CI! aep M ar 
К A SO の + < y EN fos o PO De ч ത്‌ Ж 


Ете жен oi қ о Я 
С «obs. | 
119 M i : š 
И | | ; 3 
DON cm 1T 点 を 挙げ て むき ます . @ カ ラス が 上 の 方 へ 逃げ て いる と き (いも が その へ ん は 許し て くだ さい . ぼく と し て 
du Q e7- > A 4323202൧൨7 LR, 帽子 の 一 部 や 41% ож L7: EE വിധം (7: t は 90 点 の 出来 びと 思い ます . 
core o 足 が 表示 る れ た まま 倒れ ます . Lol, 8) に 水鉄砲 を 射 つ と , WATER 表示 部 Wd. キャ ラク タ , イラ スト な ど 数 々 の 
Шы МЫР, Uo (2) だ 思い, を に まで 突っ 込ん で し まい ます . アド バイ ス を し て くれ た お 姉 き ま に 感 謝 し 
NN | の まま に し て あり ます . ЖЕЛЕ СӘЛ C ST. ci, まだ いつ が この 誌面 上 で 
M A e スズメ が カラ ス や 水鉄砲 に 当たる と 消え ZU | 3 参考 文献 
Ecc ര്‌, し か し じ 。 こ の 方 が 作戦 が 宮内 博史 : "JUMPING RUNNER”, 
ео 立て られ て いい と 思い ます . PiO 3 % 
2 ЧГ e 7. AA の ふん が 帽子 に 3879 っ て も す e に — A Aa uc uc N ежен б =< A М WA 
(5652 _ 人 避け れ ば 死に ませ ん . この 方 が 都合 が い വിന? റ сы っ た + と も な アー 
on (PTS LEDT, か な り 無 駄 が ある と は 思い ます 
Ы ——————— リス ト 1 POTATO PANIC キャ ラク タ 定 義 プ ログ ラム —O————— 
ME 10 0851, 124: POKE52, 27 :POKES5, 124: POKES 6.36.36 | 201,26,240,4,202,208,242 
RY 6,2? : CLR | 230 ГВТВ0,0,0,0,0,0,0,0,0,0,255,0.0,255, 470 ൬87996, 169, 27,157,132,30,169,2,157,1 
WA 20 : 0,0 32,150,76,239,27 
5532 z 30 REM----CHRRRCTER--- 240 DATAA, 0, 36, 36, 36, 36, 36, 36, 36, 36, 36,3 480 : 
S 40 FORIS?168T07551:RERDR:POKEI,R:NEXT 6,36,36,0,0 490 РЕМ---МРСМІМЕ 3--- 
КЖ: 250 DRTRO,0,240,0,0,240,0,0,0,0,15,0,2,1 || ой FORI=7115T07137 : RERDR : POKEI,R: NEXT 
LUE ; 60 DRTR8,8,0,0,0,3,3,7,0,0,0,0,0,224,224 5,0,0 “0: 
ENG ‚249 260 DATA36, 36, 35, 32, 32, 35, 36,36,36,36,19 || 520 6൬162, 14, 189, 118,31,201, 32. 208, 10, 
АРБ” 70 ൬87193, 71, 79, 198. 199, 84, 83, 113, 224,240 || 6.4,4,196,36,36 169, 42,157, 118, 31, 169,2 
yw ,248,152,176,152, 120,124 270 nRTR255,255,255,255,255,255,255, 255, || 530 267൧17, 118, 151,282, 208, 236,96. 
ന 80 DRTR24,28,30,15,15,11,16,48, 250, 58,58 || 0,0,255,0,0,195,26,36 540 : i 
К, ,148,240,208,8,12 280 DRTR36,36.195,0,0,255,0,0,2,4,30;4.1 || 550 REM----, 1---- - 
sy d 98 DRTR8,29,62.124, Бүл кез 4,127,78,4 560 FORI*7083T07114:RERDR:POKET,R:NEXT 
е 8, 2,1,99,127 290 ПАТА64,9.54,0,64,0,64,0,8, 64,0,64,0, s70 : 
た 00 DRTRO, の 9,@,9,9,1,227,252, 235, 235, 235, 64,0,64 580 287223, 9. 223, 8, 223, 8, 223, 8 , 223, 8, 21 
വലു: | 235, 234, 124, 56, 255 309 : 0,212,0,217,0 | 
PAM CS 110 26719299, 140, 156, 29, 60. 128, 253,227,0, || 310 REM---MRCHINE 1--- 590 ൬9൧217, 9, 213, 9, 217, 8, 221, 9, 8. മ, 213, 
FET 14, 127, 255, 255, 255,255, 126 328 FORIS7S52T07670:RERDR:POKET, R:NEXT 0,0,0,223,0 
4/6 | 129 ഉണ്ട, 14, 125, 221, 255, 247,126,0,0,0,2 || 339 688 : 
м i^ 4,92,116,56,0,0 72 TATA162, 14, 189, 96,31,201,27,208,5,16 || 610 КЕМ----, 2---- 
рс КО 130 DRTR16,146,68,0,2,73.136,0,32.112,24 || 9:32. 157,96,31, 202, 208 620 FORIZ7853T07082:RERDR:POKET,R:NEXT 
Жез 0,251,255,199,131,7 359 818241, 162, 234, 160, 15, 189, 110, 39, 19 || 630 : 
e 140 DRTR8,28,30,198,254,198,130,192,11,9 || 2,15, 208,5,169,32,157, 110 640 29876217, 58, 213, 25, 217, 58, 213, 25, 217, 
Ес ,1,0,0,0,0,0 368 ൬67938, 281 , 25,240, 28, 201, 26, 240, 40,2 || 100, 223, 20, 227, 13,0, 5 
が いい 158 ൬6878169, 32, 9, 8, 9, 9, മ൭,൭, ൭, ഒ, 9, 66,൦7,6 27, 242, 52, 292, 248, 16 650 768227, 13, 0, 5, 227, 13, 8. 5. 221, 59, 213 
ДЕ 7); 5,99,63 376 DATA136, 192, 1 ,298,224,292, 282, 282, 26 || ,25,223,25 
160 26799. 9. 8, 132, 132, 4, 149, 252, 63, 63, 15 || 2.202, 202, 202, 202,76,147,29 668 : | 
Bas ç ,3,1,1,0,0 380 979396 , 32, 241 , 29, 169, 26, 157, 111, 39, 1 670 КЕМ----, 3---- 
ELS 178 26718248, 248, 240, 128, 128, 8, ൭, 9, 24, 56, || 69,4, 157,111,150,76, 173 680 FORT=7936T07952: READA :POKET , A: NEXT . 
൭. 56, 24, 48, 110,255, 247 390 67823, 32, 241. 29, 169, 25, 157, 111, 39. 1 698 : 
a е | 180 DATA206. 28, 120, 96.96.56,8. 156,128,70, || 69,4,157,111,150, 76,173 700 DRTR223,221,0,217,213,0, 207, 204,0, 19 
RRA 111. 126,254, 126,60,0 400 167823, 32, 241, 29, 169, 27, 157, 132,39,1 || 8,179,0,0,187,0,0 
2b 190 ൬6൯൦, 15, 254, 254. 68, 38, 15, 8, 8, 8, 12,1 || 69.2, 157, 132,150, 76,173 710 DATA191 
бб? 2,0,0,0,0 410 DRTR29,169,32,157,110,30,96 72൫ : 
4% 200 DATAQ, 8, 7, 8, 16, 35, 36, 36, 8, 8,224, 16,8 || 420 ` 730 REM----RUTO RUN--- 
2% ,196,26,36 430 REM---MACHINE 2--- 740 FORIZ631T0639:RERDR: POKE I, А: NEXT : POK 
К | 219 Т8Т836,36,35,16,8,7,0,0,36,36,196,8, || 440 FORIZ?139T07167:RERDR:POKEI,R:NEXT Е198,9 
ж | 16,224,0,0 a50 : 750 : 
OS 220 ൬8788, 8, 8, 8. 8, 9, 8.8, 36, 36, 36, 36, 36,3 || 460 DRTR162,233, 199, 119,39,291,25,249,8, || 760 76൯67, 76.82, 13, 78, 69, 97, 13, 131 
Жж, リス トン POTATO PANIC BASIC リ スト 
peur ^^ - 
Vs 170 POKEM3,247?:FORI=1T019:NEXT :POKEM3,9 || 40 RERDZ:POKEM3,Z 80 PRINTLEFT$(CV$,R)SPCCBD""DPQIIQRQII " 
Ar 9 00508350 KRRRS------ | 9$ 49 409 
5 2 TI$2"000000" 4 0М70007046,62,70,78 82 IFACSTHENYO=1 :R»4:60T086 
bur M-----CHIPS------ 46 IFRNDC1)>, 7THENS4 84 YO=4 
КЕЕ 6 РеРЕЕК(197) 48 Р=РЕЕКС8076+В) : IFP19RNDP く 14THENSM=1: || 86 IFRU<2THEN136 
DOT 8 IFP=45RNDMR>9THEN179 ` 007062 88 5У57115 
2 Ir 10 IFP=37RNDMR>9THEN292 50 P=PEEK(8077+B) : IFP>19RNDP く 14THENSM=2: || 90 IFHESORNDRND(ID«. 4+RU/19THENHE=1 : ത്ര 
ga 12 CX=X:X=X+(P=17RNDX>1)-〈P=41RNDX く 12) 007062 NT(RND(1)86)82+1 
Ts | 14 P1sPEEK(7988*X) :Р2=РЕЕКС7989+Х) 52 BF*B:IFRND(122.3THENBsB*SGNCK-B):IFBF || 92 IFHE=9THEN124 | 
Ra h 16 IFP1=270RP2=27THEN228 <>BTHENS6 94 HK=K+1 : IFHK=2THENHK=0: 0070124. 
59) 18 IFP114RNDP1<230RP2〉14RNDP2<23THEN228 || 54 BF=B: B=B+(RND( 1)2, SRNDB212- (RND(1)5.5 || 96 IFHE=10RHE=13+RUTHEN105 
калық 20 IFCKXOXTHENPRINTLEFT$(V$, 15)SPC(CX)" ANDB<12) 98 IFHE>1RNDHE<6THEN106 
OR S 91 Qui ^ 56 IFBCOBFTHENPRINTLEFTS V. 4)SPCCBF)" 100 IFHE>5RNDHE<9+RUTHEN1 19 
Mano 4 144 | Ql Qui " 102 IFHE>8+RURNDHE く 13+RUTHEN1 16 
Ex 22 PRINTLEFT$CY$, 15)SPCOO "E AQ I 1eBCQ ID || ^f^. t0 104 PRINTLEFT$(V$,22)SPCCHX) "YM" :HE=0 : GO 
NT 777 777 || 58 PRINTLEFTS(YS, 4) SPCCB) "TOPQ 1 IQR" | фт 
V. " i 人 ト 111 10124 
Да» 24 PRINTLEFTS(YS, 15)SPCCX) "¥ BAG | LeBCQ 2 | 68 Ү0-1:007086 105 PRINTLEFT$(Y$,21)SPC(HX)"Y8Q | MI" : GOT 
V A (oM ttt || 62 AF=A:AsA+1 ANA t 777 
%% E" || 64 PRINTLEFTS(YS,AF)SPCCB)" അന്ധ || 0122 
£s 26 IFXm12RNDMR<>8THENMR=MR+1 : GOSUB310 7777 177 106 നനെ; WIX"; : 
ЖЗШ 28 IFK0<39-RUTHEN36 ° EE. 
ROE к 38 КОз0 66 IFA=17THENYO=3 : РОКЕӨӨ?З+В+5и, 32: SW=Q: TFHES2THEN122 
| 32 ҒОР1>80787080885ТЕР2: TFPEEKCT〉 く う 32THE 507086 108 0൫൩9൪൦ :G0T0122 
Tr NPOKEI , PEEK て 1 )+1 : IFPEEK(I)=14THEN222 ” ا‎ кт етене 11 
な 34 NEXT eno $(Y$, у; 
Wir 36 KOzK0*1:PRINTLEFT$(Y$,15)SPCC142"—Q! || 72 PRINTLEFT$(Y$,ñ)SPC(B)"e DPQ I IARA | IX K E з ааз rêy m 
2514 1" 1^ TIT TOTT || Es6THENPRINT"Q Ұй" š 
kd P ғ “Ol. ©" i n . MM | 
"NC ЕЕ Ж, 112 IFHX-1=XORHX=XTHEN228 
NN 38 POKEM3, @:MU=MU+1 : IFMU=47THENMU=1 ‘REST || 74 IFA=STHENYO=1 :Re4 : 901086 114 GQT0122 ` 
кен ЧЕ = -— 007086 | 116 PRINTLEFTSCVS, 94HE-RU)SPCCHX " THQ IX" 
ma いき な り 言 う の も な ん で す が , も し か し て , コム バッ ク よ り 発 売 中 の PC_6001 用 r ロ ポッ トウ ォ ー ズ の バ ッ ケ ー ジ イラ スト は あの , ЖЕНШ 


孝 さ ん で は な いで し ょ うか ? ? 天野 さん と 聞い て ピン と きた 人 は お そら く SF 小 説 ファ ン か 。 аятты മ LE ЕЛ 
ട്‌ し た か ? 面白 いっ / -— | E 


リス トク 2 | РОТАТО PANIC BASIC リ スト 


372 PRINT"QQQQ]]] RHIGH-SCORE +" ;RIGHTS( 
ММ + 

"00000"%М104(57К%(Н6),2),5) 

374 PRINT"QJ1JWRVOUR-SCORE €";RIGHT$("QQ 
717777 t 

000"4MIDS(STRS(SC),2),5) 


7" 


216 POKES976+P+X, 2-1 
218 POKEM3, 9: 505504 1-1 1019 : 00518392 
220 POKEMS, 9 :MFsMR-1 :G0SUB319 : 30022 

222 FO0RJ«240T0245: POKEMS, J : POKEMS, 7-239: 
NEXT J : POKEMS3, 8: POKEMS, 15 

224 MS=MS+1 : IFMS=6THENLE=LE-1 : IFLEsOTHEN 


j : IFHESS+RUTHENPRINT"@@ | " :0070122 
MM 
118 PRINT"ee Гуж" :5070122 


777 
120 PRINTLEFTS(Y$, 22)SPCCHX) "Ұй" 


7 228 376 PRINT"QQQQ〕]]#RHIT «RETURN ൧൪൦"; 
122 НЕ=НЕ+1 226 GOSUR306:POKEI, 32:007034 MMMMMMM + E X 
124 IFRU<3THEN136 228 R$zTIS 378 IFPEEKC197Z〉<>15THEN378 
126 SvS7115:IFSK<>9THEN139 238 POKEM3, 0 :PRINTLEFTSCYS, 15)SPCCCH " 380 FORIZ7053T07082STEP2 : POKEM3, PEEK I): 
128 PRINTLEFTSCYS, 6*RNDC1)965 "Jt v" 81 0!” FORJs1TOPEEKCI41»W2.5:NEXTJ, I: POKEM3, 9 
77 777 111 382 SC=9:RU=1 : 01153 : A$=" 000000" 
130 2 232 PRINTLEFT$CY$, 16)SPCCX)" ま FeOHQ IIJ" 384 A=4: B=? X27 :WA=8 :HE=9 : v0=1 :RESTORE : M 


132 IFRND(15«. 0*RU/10THENSYS7138 

134 SK=SK+1 : IFSK>15-RUTHENSK=0 

136 PRINTLEFT$(Y$, 1550൮4 "AIVA IS" 
(бала 9. 

138 ІҒТІ42"000059"ТНЕМРКІМТІЕРТ%(7%,1425 

0 9 ൪൯൭൭9" 80700142 


TT 77 
234 F0R12223T0128STEP-. 5: POKEM1, I: NEXT:P 
OKEM1, 9 
236 ҒОЮ1-1702000:МЕХТ 
238 PH=CH-1 : IFCH=9THEN242 
248 0051/8384:71%-8%:00704 
242 PRINTLEFT$(vY$,8)"JIR"; FORT=1TD14 :PR 
M 
INTMID$(" GAME OVER ",],1); 
244 FORJ=1T0199 :NEXTJ, I 
246 FO0RIs7036T07052:POKEM3, PEEKCI > : FORJ= 
1T0100:NEXTJ, I :POKEM3,0 
248 FORI=1Tn1999 :NEXT 
250 IFSC>=HSTHENHS=SC :PRINTLEFT$(V$£, 10)" 
രാ VOU ARE TOP! ":FORIS1TO2000:NEXT 
MM 
252 PRINTLEFTS(YS, 12)"ERITRY RGRINCY/ND " 
| TM 
254 IFPEEK(197)211THENGOSUB356 : G0TO2 
256 IFPEEKC19?)=28THENPOKE36869, 249: PDKE 
36879,27 :PRINT"9" END 


U=9 :K0=0 
386 РЕ1НТ"Ө1 "; :РОЁТ=@ТО21 :PRINT"S"SPCCI) 
| м 7 


"K" : NEXT | 
388 FORI=1T014:PRINT "SQQH "SPCC I) "К" :NEXT 
1117 
390 FORI=2T022: PRINTLEFTS(Y$, 1)"K"SPCC14 
) "K^; :РОКЕ?679%1%22,11:Р0КЕ38399%1%22,4: 
NEXT 
392 ҒОЮ1«8164708185:РОКЕ1,11:Р0КЕ1%30720 
, 4: NEXT 
394 PRINT "S01 RHATER" 
м 
396 PRINT"SQWR"SPCC16)"HI-SC" 
м 
398 РКІМТ"900000078"5РС(16)"5СОКЕ" 
111111117 
400 PRINTLEFTS(YS, 12)SPCC16)" RTIMEQQ lé" 
to M 
jRIGHTS( "OQ" &MIDSCSTRSCGO-VRLCR£22, 2), 2) 
402 PRINTLEFTS(Y$, 16)SPCC 16) "IRLEST" 


M 
140 SvS?115:00SUB304 : 00704 
142 POKEM3,@:FORI=1TOS90 : NEXT 
144 PRINTLEFTSCYS, 10)" JREROUND E";RIGHT$ 
イイ イト % 1 
("9"+MITS(STR を CRU),2),2)"]4CLERR" 


А Tf 

146 FORIs7983T07114:POKEM3,PEEKC1) :FORJ= 
17030:МЕХТ.), I :POKEM3, 0 
148 FORI=1TOSQQ :NEXT 
150 PRINTLEFTS(YS, 10)"JRY BONUS " 

t 
152 P=2:FORI=8078T08088STEP2: IFPEEK(I)=3 
2THEN162 
154 PRINTLEFTS(YS, 19)SPC(P)" " 
156 PRINTLEFT$(V$,13)SPC(P)"IK" 


+ 1 
т : " " 
158 POKEN3,249:FORJs15T09STEP-.29:POKEM5 || 258 0070254 š ; а „ || 494 PRINTLEFTSCVS, 20) SPCC 16) " rRROUND 
| : D 300 PRINT"SQQGeR"SPCC16) ; RIGHTS "00000" + M 
; J ‘NEXT J :POKEM3, 0: POKEMS, 15 トト 406 00518308 : 80518382 : 00518396 : 0051183068: 


160 505501999൪ : 00518392 
162 Р=Р+2:МЕХТ 
164 FORI*170T0249STEP. 5:РОКЕМЗ, 1:РОКЕМ2, 
I : NEXT : POKÉM3, മ : POKEN2, 0 
166 FORI=1T02999 :NEXT 
168 RU=RU+1 : 60SUB384 : 60T02 
170 60൫3. 247 :FORI=1T019 ‘NEXT :POKEM3, 0 
172 FORI=14TOSSTEP-1 ‘PRINTLEFTS(YS, 0500 
00൭൫, " 
м 
174 Р=РЕЕК(7659+1—22+Х) 
176 IFPs210RPs22THENSCsSC+56 :YO=4 : 007018 


60508310 
408 FORI=18T022:PRINTLEFTS(YS, I)" 1 kik 
м 


MID$(STR$(HS),2),5):RETURN 
302 PRINT"SQQQQQQQQ+R"SPC(16);RIGHT$("00 
11111111111 

999"+MID$STR$CSC),2),5) : RETURN 

304 PRINTLEFT$(V$, 14) SPCC19D) " eR" ;RIONTS( 
tf 

" QQ" *«MIDSCSTR$CGQ-VRLCTIS$2),2),2) :RETURN 

306 1൩൧൭൦൭, 18)SPC(19) " AR" RIGHTS. 
M 

"9Q"AMIDSCSTRSCCH) , 2), 2) : RETURN 

308 PRINTLEFT$(V$, 22) SPCC 19) " eR" ;jRIGHT$( 


iN" : NEXT 
410 PRINTLEFTS(YS, 15)SPCC LA)" QIT Q1, " 
t MM 77 
412 PRINTLEFT$(Y$,19)"JJIKJKJKJK)K K" 
15:49 
414 PRINTLEFT$(V$,R)SPCCB) DPQ | IQR" 
. MM 
416 PRINTLEFTS(YS, 15)SPCCX〉 "E AQ | 1«ВС0 | | 
т 77777 MM 


418 PRINTLEFT$CV$, 19)"]]]]#RROUND ";RIG 
1111 t 


| м 
"@0"+MID$(STR$(RU),2),2)"S":RETURN 


2 
178 IFP=1 1 THENPO=1 : 0070182 
180 NEXT 


310 PRINT"SQ11111114" j LEFT" kkk" , ll 


NTP TEES. R jRIOHTS(" " , 8-WA) : RETURN 420 FORI=1T01099:NEXT 
350 POKE36869,255:POKE36879,25:POKE36878 || 422 PRINTLEFTS(V$, 100 "21 " :RETU 


186 FORJ=1TO39 : NEXTJ, I 

188 IFPOSOTHEN200 

190 PRINTLEFT$CY$, 149000 №"; :BOSINT(C 
^ 


‚15 м 


352 11536874 : 11253687) : 13536876 : 4236877: 

MSs36878 : POKEMS, 15 

354 Н5е5000:7%«"50000000000000000000000" 
77777777717777777777777 

356 വാവ «&YW) ^ «&1 BA" 


RN 

‚430 DRTR213,217,221,0,213,217,221,0, 227, 
221,217,213,217,221,217,0 / 

432 DRTR213,217,221,0,213,217,221,0,227, 
221,217,213,217,221,213,0 


ЕМ0(12%52%50-50 
192 PRINTRIGHT$("  "+MID$(STR$(BO),2),3 


) :FORIS1TOSQQ0:NEXT 7077 Жл + 434 28718227, 227, 221, 227, 238, 238, 227, 8, 22 
194 voii നത്‌ 358 Monde Г ША. Bc" 1,221,217,217,213,0,0,0 
":20=0 : ү0=4 
: F (8976+X)=32THENP 76+X, 1 1 : š à 〇 プロ グラ ム 入 力 時 の 注意 
ыы OT GN ТИР ИТАЛ || обе PRINT ee |! 00 ! DE BASIC の リス ト 中 て 次 の よう に 1 印 の 部 分 は , + 


て 反転 文字 の 所 で す . 


10 PRINT"eSQ@J! EY ന 
1111111111111111 


198 POKE8077*X, 11 
200 OnSUR392 : P0=9 : GOT0229 
202 0013. 247 :P1=PEEK(8976+X) : P2sPEEK(8 


362 PRINT" Je ЖЕЖ 
364 PRINT"80311212870825 $'*&Y8]" 


877440 11111111 

204 IFP1=320RP2=32THEN220 366 PRINT"22222J€! !! (൨ 下 の よ うに 反転 文字 で 入力 し て 《 く だ さい . 

206 ІҒР1<>42ТНЕМР=0 : 0070212 b 111111 

208 Р=1:]ЕР2=11ТНЕМ22@ \ 368 РРІМТ"7711 ШІМ!!!" 10 PRINT "HU HE PAIR EZ" 
414 പിന 370 PRINT'1211]€4 X 22 уат 


214 POKES076*P«X,P1-1:60T0218 


ммм 


いい 4 y ` 45 * 


MC Aa 12 s 


2% m. 9 
RT RA кыр NN 


ap 


T cons 


„чыг, Бе т. で 
£ yt PI A 
+ 
\ L % 
iO ; 
/ 
9 Л 


4 4 B А + み マ Y еч fi i - 
4 42:77 y AL * P പു 4, i 4 ЭТФ mum AN の z 
و“‎ А; P. M 1 м” WESE T i 1 кз cy a E NU, ШИ 
കം പ്പ്‌ БЕЙ i AG QUEEN CA ЧУ സ്‌ 
ы ез 4 ке”) 23 y ね た 3 GK TE ЖИ മു ER 112 EV ОБУ ET 時 | で Арт ЧАМ Mec ot gi б: ا‎ SNL 
PRO pi £ pb š て ê ` M S 
2i Tn ] {ч eo и ! が 
d “+ қ ・ УКТУ, š f à 


LEVEL コ MARKS 


BASIC 二 マシ ン 語 


ОАА: 53 MOUSE 


最近 PiO な ど を 見 て も マー ク 5 用 の ゲー (250 階 ) ま で 上 が りき れ ば よい と いう ゲー ム ス は 残り の 酸素 量 x50 点 で す . 
ム な ど は ほとん ど 載 っ て いな く , レベ ル 3 TT. と きど き パ ワー エサ (RT, PART Ais 10 面 クリ アデ する と ギブ ・ ア デップ に 
ROY = ASSERTS 塗り つぶ きれ て いる ) が 降り て き て 。 これ な り ま す (これ 以上 や る と 目 に よく あり ま 
で す .「 こ れ じ ゃ いけ な いん だ 」 と 思い マー を 食べ る と 人 間 は 一 定時 間 パ ワー アッ プ ' さ せん か ら ). 
ク 5 用 の ゲー ム を 作り まし た . 1/O や РіО れ , 床 を 突き 破っ て 進む こと が で きま す ( こ POTE 
な ど で お な じみ の “スペース ・ マ ウス "の の 期間 中 は 音 が 鳴り ます ). フロ グラ な А DE 
移 殖 版 で す . マー ク 5 の IG 機 能 を フル ( ? ) ет, 過 上 へ 着く 《 を ヘリ ュ プ ター(UP 
に 活用 し た の で , スピ ー ド も か な り 速 く , O ょ り 5 現実 的 /) が 救助 に 来 て て れ ま す . 
スク ロー ル も スム ー ズ て 充分 に 楽し め る と 救助 が 終わ る と ボー ナス が 表示 きれ 面 ク リ жены. 2; ലിലും t. BASIC 
Nott. ア に な り ま す 。 の 方 は 主 に 説明 部 分 を 担当 し て いて 、 マシ 


較 プ ログ ラム ・ イ ン フ ォ メ ーション 人 間 の 操作 は , [E] T.E, |@| で 右 , [4] C ン 語 の 方 は メイ ン と な る 部 分 を 担当 し て い 


左 へ 動き ます . な お 人 間 は 究 の あい て いる iT. ұю, アド レス ・ マ ッ プ (Ж1) と 
と ころ し か 上 が れず , 下 へ 降り る こと は で き ワー ク ・ エ リ а (#2) を 載せ て お きま 
BASIC ませ ん . また 人 間 の 数 は 初め 5 人 いて , ж тос, 解析 の と き な ど 参考 に し て くだ さき 
| マシ ン 語 5000~673F 7 が 15,000 点 で 1 AÑ, マウ ス に ぶつ い . 
ғо», 酸素 が な く な る と 1 人 死亡 し ます . また 変更 点 の 方 は , 変更 点 リ スト ( 表 3 ) 
を そして, 人 間 が 全部 死亡 する と ゲー ム ・ オ を 参考 に し て くだ きい 。 な お , 人 間 の 残っ 
ー バ ー と な り ま す . て いる 数 が 7 人 以上 の 場合 。 7 人 目 以降 か 
| 単なる 移植 だ け で な く , も っ と オ マウ ス は ., 上 の 階 へ 行く ほど 発生 率 が 高 ら 表示 きれ な くく なり ま す の で 注意 し て くだ 
ООО | リンナ ル 性 を 加え て ほし か っ た て で (Hg b, 200 階 以上 に な る と か な り 避 ける . €*2 ワー ク ・ エ リア 


の が 難し く な り ま す . 


2% ; | o „0 | i 
നം Š, о, 0 得点 は 。 1 階 上 が る ご と に 面 数 10 点 。 m 

27 м 5.” 5% © 8 ус „° : 人 間 の x 

* o? o0, 9 4 с СЧ パワ ー エ サ を 食べ る と 面 数 X50 点 、 ボ ー ナ د ا‎ АҚ 


9,0,0 у 95 Ov 


Veg oue? oS o о, ° 90% 00 oo ер 0 ЖІ アド レス ・ マ ッ プ 
New ON1s を 実行 じ て ? だ きい . pagus > 440 
IC 部 分 と マシ ン 語 部 分 を リ AAS | パソ フー アッ プ 甚 間 の カウ ンタ 
それ か ら BASIC 部 分 と マシ ジン 7 000 t«225- 7-5 bovis ir 
スト どおり に 入力 し て くだ さい. 入力 し 終 B60 IG SET サ プ ブルー チン МІ туар» 
わっ た ら POKE&HFFD7、0 で 600 ボ ー に SBHB- 音 出し サブ ルー チン AMIN II バ パワー ェ サ の x。y 
LT, SAVE “MOUSE” で BASIC 部 分 を í 7 文字 出力 サ プ ブルー チン 4 E パリー エ サ は 出 て いる か 
"セー プ し ます . iki POKERHFFDZ, 1 C x ITT TY 4120, й 酸素 ゲー ジ の x。y 
12004:—1: LT, SAVEM "MOUSE—M" p か な рата erer p ДОК 
Ns , M : | 残り の 人 間 を 表示 する A 酸素 ゲー ジ の 減る スピ ー ド 
z &H5000, &H673F, &H5000C, TY | | ゲー ム ・ オ ー ペ バー 処理 4 表示 する 壁 の タイ プ 
ン 語 部 分 が BASIC 部 分 の すぐ 後に くる 59 പമ ne dt 表示 する 床 の タ イプ 
ы € 
ന്ത്യ ച്ച = Ppt ` É à スコ ア 
ょ うに モ TAPET: モー プ が 終わ っ だら 5 | 酸素 ゲー ジ の 初期 設定 ハイ ・ ス コア 
LOAD? C, 録音 ミ പ്പി > * U | Ж, 壁 を 表示 する マウ ス の 発生 率 
た だ た ほう が いい で し ょ う (ボー レー ト の 切り 5D 人 間 の 存在 フラ グ 
替え を 忘れ ず に ). Bead ボー ナス 得点 
š ч 3 SE2A~ б マウ ス の フラ グ X 3 バイ ト お よび マウ ス 
o9 ,o9, Vo, 9,0070 (V o “о, oe „5 cO diosa Ox, y な ど 
° KA جد‎ Ашу оү PC ообо 720! SEG 人 間 と マウ ス が ぶつ か っ た か TEE 
72702 00 СКА | 人 間 が バ パワー エサ を 食べ た か 
9% 0,0727 vo So 2222 20,7% 5 人 間 移 動 関係 サブ ルー チン 
Oo o o. 70, °0° 15 00 6. 0 
e 970 © O 0 の 74.9 ൭ | A50 —7 у 710803 
NEW ОМ15 51114, BASIC 部 分 を ロ 81: パワ ー エ サ の 処理 | 
ー ド し て RUN する と 、 自動 的 に マシ ン 語 | [2217 MRS голе Maced 
部 分 が 読み 込ま れ ま す 。 終わ る と 説明 が 表 | О кулаа нче 
Rat, を 押す と ゲー ム が スタ 48694: қ バ パワー エサ の 発生 率 
പ. |]. し ます. 酸素 ゲー ジ の 減少 率 の 初期 値 


酸素 ゲー ジ の 減少 率 の 最少 値 
全体 の スピ ー ド 


この ゲー ム の 内 容 は ,. 人 間 を 操作 し て 上 
か ら 降 り て くる マウ ス を 避け な が ら , 屋上 


ആന്ന്‌ ёа 7 11(пс) ТТР ERIE, いじ くり だ た だい I" と 思っ て きた だ けれど,「『 ど ビ う せ ド 田舎 の 秋田 
じゃ みる こ だ ぁ 人 不可 能 だ カー な 」 と あき ら め て た の に . 本 当 に 感動 !! PSI ちょ っ と 大 げ る だ っ た か な ? PS.2 最近 の PiO で アド ベン チ 
ャ ー ゲ ー ム の 答え を 理 い て る 方 が いま す が 。 い い の か な ? 書 く な と は いい ませ ん が ヒン ト で らい に А жакси. だ 方 が いい ん じゃ な いか と … а 
се, けっ し て 甘く な よ は いっ て ませ ん よ . 2. кн... RURROCRR UP UI, MD (JR ゆう ず あ の で ぃ ぶる まし Sr 


ай ENR таз сас» Me MAGN ев. er Lue - 
x D VEA E ОЛЫК ERE АЙЕ SD D n 


У: 

も し ハイ ・ ス コア を クリ アデ ア し だ い 場 合 
POKE&H4A29, О: А Sa ° 
を 行なっ て 〈 く だるい ぃ 


今回 の ゲー ム は , FM-7 用 の スペ ー ス ・ 
マウ ス を か な り 意 識 し て 作っ だ の で , FM- 
7 用 より 画面 が ハデ に 出来 て いま す . し か 


つい に 最上 階 ノ ヘ へ ヘリコプター だ . 


RRR リス ト 1 SPACE MOUSE BASIC リ スト 


Ke 表 MM も も も も も も て いい いも も も も も も いい も も も っ 
SPACE MOUSE ж 

3507ж 1984, 8, 24 ж 

40 ж by H. Kuwabara ж 

90 CEE CC E CC eee eg De КК 

‘80 ? 

100 CLEAR300, &HAFFF : RANDOMI ZECTIME/4) :WI 
DTH4O: SCREEN О, , 1 

110 IF PEEK(&HSO18)=&H さ じ THEN 130 

120 PRINT "Machine language loading ..." : 
POKE&HFFD7, 1:1. ОАрМ"МОМ5Е-М" : EXEC&HSBG6O 
130 CLS:COLOR S:LOCATE10, O: PRINT" く お お お お お お 
お お お お お お お お お お お | け " 

140 PRINTTRB( 10) "お ネネ SPACE MOUSE +f" 


20 '* 


атады ааа リス ト 2 SPACE MOUSE 


150 PRINTTAB(10)" こ お お お お お お お お お お お お お お お お お さ " : GO 
SUB300 

160 COLOR 3:PRINT:PRINT" 
ADVANCE TABLE ###" : С050В500 
170 COLOR 6:PRINT:PRINT" 
..... SCENE x 50 PTS"sGUSUB さ OO 

180 COLOR 4:PRINT:PRINT" GO UP THE FLO 
OR -. SCENE x 10 PTS":GO0SUBSOO 

190 COLOR 5: РКІМТ : РКІМТ" BONUS ....... 
s... OXYGEN x 50 PTS":GOSUBSOO 
200 COLOR 3:PRINT:PRINT:PRINT" 
ction)" : 60508300 

210 COLOR 7:PRINTTAB( 18) "UP" 
220 PRINTTRB( 17)" く おけ " : РКІМТТАВ 17) "53835 


### SCORE 


(Key fun 


$ 


Ln 


" 5” 5 су 1 GAN 2n h e TX 
s Pe Да ас ай 


POWER FOOD ・・- 


881118 18988088830 
681118 18583338 


pio 


し 筆者 は PSG カー ド を 持っ て いな いた だ ため , 
BGM が な く て 音 の ほう が 少し 物足りな い 
気 が し ます が 。 そこ の と ころ は 大 目 に 見 て 
くだ る さい. 
参考 文献 
1) 芸 夢 狂人 : 
‚ C814F10H Z 
2) 紅林 俊彦 : 
84 年 4 月 号 


"SPACE MOUSE”, I/O, 


"SPACE MOUSE', PiO, 


250 РКІМТТАВС14) "< 2172285 < 217" :PRINTTABCS)D" 
LEFT 848 + #63 RIGHT" 
240 РКІМТТАВ (14) "28% 
250 COLOR 2:РКІМТ : РКІМТ" 


28% " : GUSUB さ OO 
15000 PTS + 
* MAN 2° 上 トリ 7I2":G0SUB300 

260 COLOR S:PRINT:PRINTTAB(12)"HIT RETUR 
N KEY" 

270 IF INKEY$ O СНЯФ (15) THEN 270 

280 EXEC&H6678:FORIzOTO2000 

290 IF INKEY$=CHR$( 1 さ ) THEN 280 ELSE МЕХ 
T:GOTO130 

ЗОО FORI=OTOSOO : NEXT : RETURN 
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と ガチ ョ ー ン / 知 らん か っ た . SOLVALOU さ ん が 6001 ユ ュー ザー だ っ た と は 、 同じ 6001 ユ ー ザ ー と LOB LUCR U Tt. СЕ 3 TSOLVALOU 
ç фур Apt a A 6001. (も みな みり +5 xm юзо TT ласы» り ま せん か 。 | 
0012.—4*— е Н * で きる で し | ク を され る そう な の で . 
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PiO ス クエ ア で は , PiO PiO の コ 
ー ナ ー で は 書き きれ な いよ うな 情報 
や 。 メッ セー ジ を お 待ち いた し ます . 


(Р) 


PIOTIBSO" Lon d Ал 


@ 茅 ヶ 崎 の 佐々 木 君 ФОМА 


PiO 11 月 号 の し いら か ん すさ ん と 同じ し いら か ん すさ ん , あな た の 所 へ も 届 
こと が 僕 に も あり まし た . た し か 9 月 の きま し た か . 実は 私 の 所 に も 来 た ん で す 
終わ り ご ろだ っ た と 思い ます . 学校 か ら / あ の 不幸 の 手紙 が / ノ 消印 な どの こと も 
帰っ て ボス ト を 見 る と , た だ 一 通 だ け え 同一 な の て 同じ 者 か ら 来 た も の だ と 思い 


の 気 ま で れ イ ン ベ ー タ 
完全 無能 の プロ グラ マ : みん な , PiO の 
11 月 号 も う 見 た だ か. 
あい ・ 節 人 : ああ , 見 た 見 た . 

論 会 が 載っ て た ん だ よ な . ж 


22-2, けん か に な っ ちゃ っ た . 

・ こ の 2 人 は ほっ と いて , 話 を 進め よさ 
僕ら の 討 5». 

僕ら と 同じ ペー ジ に 載っ て いた 「PL 


чч 


. Q3t8001 : +A, た だ の 雑談 じゃ ね ぇ か ANT TAIZER に つい て 」 っ て 記事 置 ん ぴ つ で 書か れ た 手紙 が …. そう で す , $t. 本 当 に 頭 に きま し た . 
| な ん だ けど , 3 面 で も スペ シャ ルフ വട 「 不 幸 の 手紙 」 だ っ た の で ST, 気 を いれ な お し て , PIO ¿C 
നവം ラグ は 出 て 《 く る ょ . 8682-13. ー ル の お か げ で , めで た く PCG を 売る 


名 前 が 載っ た . 27), た こと が ある ん だ. 

・ あ っ そ , よかっ た な …. 気 : 僕 も 2 面 と 3 面 続け て フラ グ を 出し 
HVAR, こい つ は . 初め っ か らい じ た こと が ある よ . С, その 先 は 何 か 
け て る じゃ な いか . 知っ て る ? 

: なにしろ, 前 回 で 「Q」 と し か 名 前 | Æ: 悪かっ た な , 8 面 ま で し か 行っ だ こ 
が 出 な か っ た だ から な . と が な いか ら 知ら な いよ . それから . 
: 冗談 な ん か や っ て る か ら だ , まっ た "Gold Cross」 っ て ゲー ム は まだ 打 
ち 込 ん で な いけ ど , 面白 そう だ な . 
・ 本 来 な ら , 一 番 初 め に 「Q 式 8001」 気 : うん , PC-8001 の あの グラ フィ ッ ク 
と 出る は ず だ っ た の に 削ら れ て た . で 絵 が 出る の は 確か に 珍し いよ な . 
・ し ょ せん 「Q 式 8001」 な ん て ペン ネ P8 の アド ベン チャ ー ゲ ー ム は 少な 
ー ム は , 世に 出 ら れ な い 定 め ゆな ん が だ . いし , あっ て も だ いて い テ キス ト 型 
・ ど う 言 うこ と だ 。 世に 出 ら れ な いっ だ も ん な . 

て の は . 宰 : みん な が PC-8001 は 旧式 どっ て いう 
(ഠാ, 某 B 誌 に ゲロ グラ ム 送 っ て の も , この 点 で は うな ず け る よう な 
没 く ら っ て や ん の . A5, bh, Q 式 8001 の 様子 が 何 


僕 は その 場 で 破り す て て , どう し て 僕 
の 所 に 来 た の だ ろう と 考え て みる と , Я 
は 1/04 月 号 と 9 月 号 (PiO で な く て ゴ 
ХУУ) に 載っ た こと (|/O バ ザー ル ) が 
ある ん で す . いま まで に この よう な こ と 
が 数 回 あり まし た . 

そん な わけ で , 僕 は 思わ ず 手 紙 を 書い 
て し まい まし た 。 Рэжа 
の で は あり ませ ん ね . 


ポケ コン の 未来 像 


CORRE 


8 月 号 , 10 月 号 と ボケ コン に つい て 載 


こと が で きま し て , その お 金 で プリ ンタ 
を 買い まし た . 買っ て くれ た M 氏 , 他 お 
た より を くれ た 2 名 の 方 , あり が と う ご 
ざい まし た . また いつ か 誌面 で お 会 いし 
sva. 


を と っ ぱら っ て 全面 を ディ スプ レイ に し 


оо 9 9» о 9 о»«> 4а Я 9 d о а ൭: яо 


ы FOTO МӘЖ ione ЖИЫ A っ て ます の で , 私 も 一 言 . て し まう の で す . し か し , いっ た い ど う ` 
ЕДІ Qio, UMATES? まず , ポケ コン は クリ ー ン 設計 に すべ や っ て 入力 する ん だ !? と 言い た い 方 も い 
: この 裏 切 者 / 。 E geo, 8001 は 旧式 だ か ら …。 Dol ETT. メモ リ 保護 機能 が ある の に ,RO る で し ょ う . ご 心配 な く , ちゃ ん と 考え 
Ес ерде бекіт ақымақ) S asd sy ғ അടടാ, て あり ます , ディスプレイ の 表面 に タッ 
切っ た じゃ な いか / 1 а: ы, お まえ ら ま て … 旧 式 じ ゃ な い 。 CMT イ ンタ ー フ ェ イ ス , IPL 等 は 内 蔵 に チ ・ セ ン サ を 付け , キー ボー ド ・ マ トリ 
ТЕО QAI TAA EE な り ま す )、. クス を ディ スプ レイ 上 に 表示 し て そこ か 
日 本 語 だ ) യാതി 次 に 表示 部 . 現在 の ボケ コン で は PC- ら 入 力 す れ ば よい の で す (そん な 計算 機 
: お まえ だ っ て 其 F 誌 で 某社 の 本 を പല്‍ ‚ 1 1350 サ イズ で も , まだ 狭い と 思い ます . 付き の 時 計 が あっ た で し ょ う . മ, BR 
Í 宣伝 し た だ ろ / i: í A: PDD, まだ 言い だ いこ t». 7% し か し , ボケ コン に これ 以上 の ディ スプ EAK キー や 電源 スイ ッ チ は 別に し な けり 
: な に い , 工学 社 の 宿敵 の 基 A 社 だ と kt, う や む や の うち に 今回 は 年 レイ を 要求 する の は 無理 難題 , LAR ゃ な り ま せん な ). ` 
Para ] dit 、 終 わる …. っ て も ん で す . この 程度 な ら 今 の 技術 で も 充分 作れ る 
「 いら ん こし と 言い や が っ て 。 この 旧式 と ころ が , 我々 と し て は も っ と 広い デ ボケ コン だ と 思う の で す が . 愛 機 1255 を 
| M N 3 a ィ ス プレ イ が ほし い . な ら , どう すれ ば 使っ て いて , ふと 考え た ボケ コン の 未来 
кебир p Rica よい か …. 簡単 で す . 邪魔 な キー ボー ド 像 で し た . 


| | ІЕРІСЛ--" = E: て ん へ XITUHBO 
@⑧ ス ー パ ー サ テツ ライ つい で 
皆さん は , キャ ラク タ を ドッ トグラフ өлігін 


ィ ッ ク で 作る 場合 に は , カラ ー で し ます 
X 1 に も TURBO と いう 強力 な 味方 が 


か ? それ と も 一 色 に 統一 し ます か ? これ 


は 人 に よっ て マチ マチ だ と 思い ます . 

それ は よい と し て , まず 図 1 を 見 て 〈 
だ さい . V サ イン の キャ ラク タ で す . В. 
分 と し て は で き が いい と 思っ て いま す が , 
いざ これ を 画面 に 出 そ う と する と 困っ た 
こと が お きま す . 指 と 指 の 間 を どう や っ 
て 表示 し ます か ? で き な い で し ょ う . で 
きま せん . 

こう いっ た キャ ラク タ 化 で き な い も の 


つい た . Z80 で も ここ まで で きる の で あ 
5. X1 は いい ハー ド だ と 思う . ЖШС 
X 1 を 買っ て 良かっ た と 思っ た . 皆さん 
は どう で すか . 自分 の パソ コン に 満足 し 
て いま すか . 僕 は と っ て も 満足 で す . は 
は っ , 何で こん な こと を 書い た ん だ ろう . 

ちな み に , 僕 は X1 の ユー ザー で す が , 
TURBO も お 金 を た め て 買う つも り で す . 
RS-232C が 初め か ら 付 いて る か ら 音 響 
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カプ ラ を 付け て 友人 と デー タ 通 信 で きる 
L, хі で は で き な か っ た 複数 の キー 判 
断 が で きる よう に な っ て いる し , PME 
が BASIC で サポ ー ト され て いる か ら 面 白 
VN, 

と ころ で , 8 ビッ ト も これ て で 本 当 に 終 
わり を 迎え た の で は な いか と 思い ます が 


カバ ー す れ ば よい と 思い ます . 
そう いう わけ で , これ か ら も 楽し い キ 
ャ ラク タ を どん どん 投稿 し て くだ さい . 


が 。 今 まで か な りあ り ま し た . か と いっ 
て , 間 を 開け て 作る と 図 2 の よう に お か 


し く な っ て し まい ます . その 点 は , Ша 
ん の キャ ラク タ 作 り の セン ス で な ん と か 


り し て 面白 いん じゃ な いで し ょ うか . 
これ が アイ デア 倒れ に 終わ ら な いこ と 
を , PiO 読 者 に 期待 し ます . 


リレー アド ベン チャ ー 


@M · 1 
Ел, アド ベン チャ ー ゲ ー ム が は ば を 
きか す よ うに な っ て きま し た . そこ て , 


こう ゆう の は どう で し ょ うか . 題し て 「 リ 
レー アド ベン チャ ー」 で す . 

つま り , ある 人 が ゲー ム を 作り , その 
続き を また 別 の 人 が 作る と いう も の で す . 


ゆ テ キス ト ・ ア ド ベ ンチ ャ ー で ある 


AN 


@ プ ログ ラム ・ サ イズ は ポケ コン 用 の も 


の より 大 きめ ぐら いと する 
持ち 物 な ど は 次 の ゲー ム に も 引き 継ぎ , 
解い た ら 持 ち 物 を セー プ し て 次 の ゲー ム 
で ロー ド す る 。. 

コマ ンド も 引き 継ぐ か , 追加 や 削除 し 
て も よい 

と , まあ こん な も ん で し ょ う ね . これ な 
ら 手軽 に 作っ た り 移 植 し た り で きる し , 
思い も よら な か っ た よう な 結末 に な っ た 


m 2 КО 


が Se M Fade Net Ne SG a OR A 


16 ビ ッ ト の X 1 と いう の は どう な っ て い 
る の で し ょ うか . シャ ー プ さん な ら 考 え 
て いる と 思い ます けど , 8 ビッ ト の X 1 
の よう な 思想 を 受け た 16 ビ ッ ト が 出 て ほ 
し いと 思い ます . 


を いま まで の ぼく の ポッ ツ 知ら ず の 経歴 に キズ が つく か も し れ な いけ ど , それ も 覚悟 で 一 言 言 わせ て も らい た い . この PiOPiO で 前 か ら 気 に な っ 
TU いや あの 1/O プ ラ ザ で も , ペー プ を つけ 忘れ た と き の 財 の よう に や か まし い ア ニ メ フ ァ ン に 対し て , 特に 毎月 か か る ず ア ニス メ 雑誌 を 質 S 
i つて いる よう な 人 や , ミン キー モモ の クリ ー ミ ー モ モ の と , 言っ て いる 人 達 に . 一 一 キミ 達 は 顔 が 悪い 一 一 2.5. 1 まき か これ に 文句 を 言っ 

Maece эз Жаиз ке йимин E S キ て ec 


Nase stipe 


最近 の ゲー ム は 非常 に 凝っ つた グラ フィ ッ 
ク 画 面 を 背景 に コミ カル な キャ ラク タ が 画 
面 を と ころ 狭し と 走り 回 り ま す .“ そ ん な ゲ 
ー ム を 作っ て みた い " と あれ これ 構想 を 練 
っ て いる 未来 の ゲー ム 作 家 も 多い と 思い ま 
す が , 最初 に 苦労 する の が グラ フィ ッ ク ・ 
パタ ー ン で す 。 RELI, 文字 の よう に プ 
リン ト 文 一 発 で 表示 させ る と いう わけ に は 
いき ませ ん か ら 

し か し , ゲー ム を 作る 上 で :, 概略 フロ ー 
チャ ー ト 作成 と 同じ くら い 重 要 な の が この 
バタ ー ン 作成 な の で す . 

തു 

1) 概 略 フ ロー チャ ー ト 作成 

Ау. ン 作 成 

(3) メ イン ・ ル ー チ ン の コー ディ ング 

Ре, ыйа 


നന്ന аре dili 
グラ フィ ッ ク ・ バ パタ ー ン で し ゃ ば 


അക നക്‌ Parme അം നം ലം ക ക ക പവം ത പവം ക്ക ക്ക വം ക്ക | 


SS < Fe e n 


と な り ま す が , この 2 と 3 の 順序 を 逆 に す 
る と プロ グラ ム の 中 途 挫折 と いう 惨め な 結 
果 に な り が ち で す . な ぜ な ら , パタ ー ン が 
で き て いな いと , プロ グラ ム の で きた 部 分 
まで を 動か し て , 出来 具合 を 表示 し て 実際 
に 確認 し て みる と いう 楽し み を 味わう こと 
が で き な い か ら で す . 

まず 。 パ ター ン を 作っ て みる 。 そ し て 。, 
それ を 表示 し な が ら ゲ ー ム を 作る . 自分 の 
作っ た パタ ー ン が , 自分 の 構想 どおり に 動 
いて くれ る (表示 され る ) co, ФОТ 
ラ モ デ ル 作 り の 完成 目前 の よう な ワク ワク 
し た 気分 を 楽し みな が ら , ゲー ム を 作る … 
考え た だ け で も 楽し く な っ て きま す よ ホネ. 

と いう わけ で , 大 事 な 大 事 な バ パタ ー ン 作成 
の た め に これ だ け は 知っ て お いて ほし いと 
いう こと を 話し て いき た いと 思い ます . 


am. ーー 


グラ フィ ッ ク 表 示 の 原理 


何事 も 原理 が 大 切な の で ここ か ら 話 を 始 
bid. 原理 は 非常 に 簡単 で す . PC-8801 

の 場合 図 1 の よう に , CRT の 向こう に テ 
キス ト 画 面 用 の セロ ファ ン と 青色 用 , 赤色 
JH, 緑色 用 の セロ ファ ン が 重なっ て 見 えて 
いる 考え で くだ さい | TT Pay ТАЗ 
面 に 直接 何 か を 書け ば 文字 が , 青 面 に 書け 
ば 青色 の 模様 を 見 る こと が で きま す . そし 
で これら の 各 や セロファン 用 に に メモリ の 
癌 が 害 | り 当て られ て いい ます. と いう こと は 。, 
この 該当 する メモ リ に デー タ を 書き 込め ば , 
任意 の パタ ー ン が 表示 で きる の で す . 


図 1 グラ フィ ッ ク 表 示 の 原理 


мани жы өк ss 


J パタ ー ン の 作成 


2 パ ター ン の 仕様 は BASIC の PUT@ X 
に よっ て 表示 する か マシン 語 で 表示 する か 
まっ や 異な が つて で てき は すず 。 

まず 。 BASIC の 方 法 に つい て 考 


CA A 
まし ょ う . 最も 簡単 な の が , BASIC コー 
ンド の PSET, LINE な ど に よっ て 画面 に 
実際 に 絵 を 書き , それ を СЕТО 方 で 配列 
に 取り 込ん で PUTO СЖЗ Б 
HET: 

この 場合 は , BASIC の 知識 以外 は 何 も 必 
要 な く , RSET инд RCC 
大 きき を 必 要 分 確保 する と いう こと に 気 を 
付け すま 良い で だけ で さす Ву wed 
方 法 に 比較 し て , СЕТЕ で パタ ー ン を 配列 
に 取り込む 時 間 が 余計 に か か る た め 。 最近 は 
あま り 見 か け ま せん . “倉庫 番 " の キャ ラク 
タダ は この 方 法 で 表示 し て いま す . 

も う ひ と つ は , GET@ 文 で 配列 に 取り 込 


アニ メ が 悪い と 言っ て いる の で は あり ませ ん ).( 前 田 優作 ) 


まれ だ データ そ の も の を あら ヵ みか: じ め DATA 
文 の デー タダ と し て ブログ ラム 中 に 持っ て お 
а, RUN され だ た とき に 民 AD 文 で パタ ー 
ン 用 配列 に 取り 込む 方 法 で す . 上 記 方 法 に 比 
BUT, 若干 の 速度 UP と メモ リ 節 約 に な り 
iW. 具体 的 に は , 

(1) 画面 に パタ ー ン を 表示 する 

ത കിളി 

3 配列 変数 の 内 容 を 読む 

ҚЫ; う 手 順 で デー タ を 作成 じ て お な お き , PUT 
@ 用 デー タ ほ し ます . 表示 は この 逆 て . 

(РОТЕ 用 デー タ を READ 文 で 配列 に 

取り 込む 

(2)PUT@ 文 で 画面 に 表示 す る 
だ け で す . この 場合 も , BASIC 以 外 は 何 の 
知識 も GAT DT, PUT@, GET@ 2 ~ 
ンド の ある すべ て の パソ コン で > ター ン を 
ЕССІЗ 7; 

だ だし, デー タ を GET@ に 頼ら な いで 作 
成す る 場合 、。 たとえば, パパ ター ン を グラ フ 
^p pw, Donc ҮКА, 

る 場合 は , GET@ が どん な 順序 で デー タ を 
収納 する か を 知っ て お くく 必要 が あり ます . 
まだ た だ, デー タ を 他 機 種 パ マソ ュ ン で 使用 し た 
いと きも 配列 へ の し まわ れ 方 が 各 機 種 に よ 
っ て 異な る ため に 同様 の 知識 が 必要 で す . 
これ に つい て は , 530 11 月 号 の 他 機 種 開 移 
植 ノ ー ト に 掲載 きれ て いる の で そちら を 参 
B8 L; C 6-95, 

グラ フィ イッ ク 麻 雀 の 牌 の デー タ は こ 
ラフ 方 眼 紙 オハ ンド トラ ンス ファ の 手法 で 
作成 され ま し た. മ്‌, この デー タ の 形 
で プログ ラム 中 に 持っ て お くく 手法 は あま り 5 
推奨 できません. なぜなら , 最初 の GET@ 
っ PUT@ に よる 方 法 は す で て BASIC レベ ル 
の 処理 の だ め に マイ クロ ソフ ト 系 の BASIC 
マシ ン で あれ ば その まま 走る と いう 長所 が 
あり , 後述 の マシ ン 語 に よる 方 法 は 表示 速 
度 が 速い と いう 長所 が ある の に 対し , この 
方 法 は 移植 性 は あま り 良 く な いし , sns 
EE ù PUT@ と 同じ と いう 中 途 半 端 な 処理 だ 
oci. SUN k asya 
最初 の 方 法 , 速度 が 要求 きれ る と き は マシ 
ン 諸 に よる 方 法 を 使用 し た 方 が 良い と 思い 


で し ゃ ば り 講 護 


21. 

と いう こと で 。 次 は マシ ジン 語 に ば あま 
タ 表示 の た め の パ ター ン 作 成 で す . 移植 性 
の 極端 に 悪い マン シン 語 で BASIC の PUT@ 
コ ュ マ ンド 相当 の ルー チン を 組む 理由 は , Ж 
示 速 度 の 向上 に つき ます . TUT, この 速 
度 に ターン ・ デ ー タ も 関係 し て くる の で 


9 EL 
バハ ター ン ・ デ ー タ あれ これ 

図 2 (а) に BASIC の GET@,. PUT@ で 
使っ て いる 形式 を 示し ます . М, ЖОК > F 
数 に 続い て デー タ が BRG の 順番 で 1 バイ ト 
(8 ドッ ト ) ずつ 並ん で いま す . この 形式 
で デー タ を 作っ て お くく と マシ ン 語 の РОТ 
ルー チン を 作ら な く て も BASIC で も 表示 で 

る と いう 利点 が あり ます . 

と ころ が, 表示 速度 を 考慮 し た 場合 は こ 
れ が で ベスト の 形式 と は 言え を ませ ん . こ こ で , 
図 3(a) に 示す 。 PC-8801 の メモ リ ・ マ ッ フ プ 
を 考え ん て みて くだ さき るい. PC-8801 は BLUE 
画面 (以下 B-RAM), R-RAM, G-RAM が 
24 УРАМОСОООН--ЕЕЕЕН ЖӘ t [5] U 
番地 に 位置 し て お り , I/O ポ ー ト の スイ ッ 
チ に よっ て 選択 る きれ ます . 

た と えば ,。 LO ポート の 5CH 番 地 に 何 か 
を 書き 込め ば (書き 込む と いう 動作 その も 
の が スイ ッ チ に な っ て いる の で , 何 を 書き 
込ん で も 良い ) B-RAM の スイ ッ チ が ON 
に な り ま す . この と き , CO00H 番 地 に デー タ 
を 送れ ば B-RAM に 表示 され ます . UAR 
1, 2 に 具体 的 な 例 を 源 げ ます. リス ト 1 
と リス ト 2 を 打ち 込ん で RUN し て みて くだ 
Sv. 画面 左上 に 青色 で AAH と いう デー タタ 
が 表示 され ます . 

ST, 話 を 戻し て 。 そん な ハー ド に な っ 

ARDU, 先ほど の PUT@ 形式 の デー 
タタ を 表示 する と き は 1 バイ ト の デー タ を 表 
示す る 毎 に スイ ッ チ の ON-OFF を する こと 
(2240, その だ た め に 表示 が 遅く な る と いう 
“мж ЖТК ЖУ ЗАУЫ ゲラ チイ ゴッグ 
画面 の 番地 は 横 方 向 640 ドッ ト (80 バ イト ) 
は 連続 し て いま す が 縦 方 向 は 80 バ イト ずつ 
増え て いき ます . マシ ン 語 は , 80 を 加え る 
と いう 処理 は 時 間 が か か りり ます が 。 1 を 加 
える と いう 処理 は 瞬時 に 行ない ます . それ 
ら を 考え 合わ せる と , 横 1 列 の デー タ を ま 
と め た 図 2(b の 形式 が で ター で は な いで し 
FDS 

と ころ が 。 この 形式 は 他 機 種 ご は あて は 
ま ら な いこ と が あり ます . だ と えば , PASO 
PIA7 の メモ リ ・ マ ッ プ を 図 3(b) に 示し ます が 『, 
グラ フィ ッ ク 画 面 の 番地 が 縦 方 向 に 8 ドッ ト 
ずつ 連続 し て いる の で す . この 場合 は 横 8 
ドッ ト ※ 縦 8 ドッ ト を 単位 と し た 図 2(c) の 
形式 の 方 が ベタ ー の は よう 

この よう に 。 シビ ア に 速度 を 追求 し て い 
QE. സാൽ аа 
ー タ 形式 を 作る 必要 が で て きま す . 

ic, 他 の 要因 の た め に デー タ 形 式 を 見 
HST 2 03:37: വന്ന 
の メモ リ が 少な 〈 く 通常 の 方 法 で は デー タ が 


о 
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入り 切ら な い 場 合 で す .・ な に し ろ グ ラフ ィ 
ッ ク の デー タ は 膨大 な メモ リ を 食い ます か 
б | 
ひと つの 方 法 は , 横 方 向 の 2 ドッ ト を ま 


と め て し まう と いう や り 方 で , 640X200 ド ` 


ッ ト と いう 横 方 向 の 解像度 が 縦 に 比較 し て 
アン バラ ンス に 細か ' い 場合 , 画面 や を 320 メ 200 
ドッ ト と みな し て デー タ を 作っ て , 表示 時 
TA, 21527, こう すれ ば 、 
デー タ が 16 ド ッ ト に な っ て 画面 に 表示 され 
id. グラ フィ ッ ク 花 札 で は , これ を 使っ 
て あの 大 き な 花 札 の 全 枚 数 分 の デー タ を や メ 
モリ に 乗せ て いま す . 

も う ひ と つ は 。, 使用 画面 の 情報 を や を パ ター 
ン 形 式 に 持た せる や り 方 で , 図 2⑨ の よう 
- に な り ま す . 最初 の 1 バイ ト が その 情報 で , 
ビッ ト 0 が 0 な ら 5G-RAM の デー タ は なし, 
ビッ ト 1 が 0 な ら R-RAM, ビッ ト 2 が 0 
な ら B-RAM デ ー タ が な し と し ます . GR 
AM が な い 場 合 の 例 を 図 2(e) に 示し ます . 
この 場合 ,、 デ ー タ が な い 画 面 に は 0 が 書き 
込ま れる よう な マシ ン 語 表示 ルー チン が 必 
HTT, 

珍 き ん 麻雀 は この デー タ 構 造 の た め , [и] 
ド 大 きき の 有 牌 で も デー タ 量 が 違い ます . K 
示 に 特殊 な 処理 を 必要 と する た だ ため に 若干 の 
速度 低下 は あり ます が (と は 言っ て も ,PU 
T〒@ 文 と は 比較 に な ら な い ほ ど 速 い ), 解 像 
度 を 低下 させ ず に メモ リ を 節約 する 良い 方 
法 ほ と 思い ます . ` 

アル フォ ス の 飛行 機 な ど は G-RAM と KR- 
RAM で 表示 され , B-RAM は 使っ て いま せ 
А», これ は メモ リ 節 約 と は また 違う 目的 の 
な ため です. アル フォ ス は B-RAM を 背景 専用 
に 使用 し て いて , B-RAM を 使わ な いで パパ 
ター ン を 作る と 移動 が と っ て も 楽に 処理 で 
きる の で す . 処理 速度 アッ プ の た め の ひ と 
つの テク ニッ ク と いえ ます . i | 

この よう に 。 マシ ン 語 で 独自 の PUT@ ル 
ー チ ン を 作っ た 場合 は パタ ー ン 形式 を 処理 
内 容 に 合わ せ て 自由 に 決定 で きま す . ぜひ 
と も 。 自分 の ゲー ム に 合っ た マシ ン 語 PU 
中 @ ル ー チ ン 作 成 に チャ レン ジ し て みて 〈 だ 
Av. つい で に GET@ ルー チン も 作っ て し 
まえ ば , それ に 少し 手 を 加え て , す で パ ター 
PLP ASP TS ED TET, 


バタ ー ン エディ イタ 
私 が ゲー ム を 作る と き , メイ ン ・ ブ ログ 
ラム より ? 先 に 作る の が 。 この パタ ー ン ・ エ 
ディ タ の ブログ ラム で す . 
Ф = СЕТО ルー チン を 作る 
@ー シ ン 語 で PUT@ ルー チン を 作る Cr 
ー ム プログ ラム の 表示 ルー チン と な る ) 

BASIC で パタ ー ン ・ エ ディ タ を 作る 
の 順序 で 作業 し ます . 

パパ ターン ・ エ ディ タ の 役目 は 。 ソー ス ・ 
パタ ー ン が ある 場合 は GET@ で パタ ー ン を 
表示 し , その パタ ー ン を スク リー ン ・ エ デ 
ィ ッ ト で 修正 し , PUT@ で メモ リ に し まい 
込む (ある い は , DATA 文 の デー タ と し て 


8 ドッ ト の . 


ずつ っ 変化 が も だ し た パ | 


と ぇ ば , 麻雀 の 万 子 牌 
を 作る と き に コピ ビー と 
し て お いて 上 半分 の 一 
ー 九 だ け 修 正す る と い 
5 具合 に 使い ます . 
その他 あれ ば いい 機 
ETT, 
@⑳ パ レッ ト ・ チ ェ ン 
ジ 機 能 
@ ミ ラー チェ ンジ 機 
ë (左右 か 上 下 に 
反転 きせ る ) 
バタ ー ン 重ね 合わ 
せ 機 能 
Өг CE LOK 
の ドッ ト 数 が 同じ 
場合 の み ) 
な ど が 考え られ ます 。. 
さら に , 最近 は 少し 


ター ン を 連続 的 に 表示 
し て .《( 通 常 は 2 バター 
LGe3EHALAE b y L 3 
示し て いあ ) アニ メー 
ショ ン 効 果 を 出し た ゲ 
ー ム が 増え て いま す . 
エニ ディ に る 253748 
ター ン を 操り 返し 表示 | 
で き る 機能 を 付加 すれ 
iQ, ます ます 使い や すい エディ イタ と な る で 
5A 1) ` 

52, 失敗 を な それ ず に , 未来 の ゲー ム 作 


3 メモ リ ・ マ ッ プ 


家 を 目指 し て マシ ン 語 に よる グラ フィ ッ ク 表 
示 に チャ レン ジ し て み ま し ょ う . 決し て 難 か 
し いこ と で は な い の で すか ら . 


リス ト 1 


“GRAPHIC TEST 
8 CLEAR ,&HBEFF 
DEF USRü-&HBFaG 
POKE &HBF BD , HAA 
A=USRG Cà» 
END 


TERIS. 


>:-2 


リス ト 2 


i» DODOOOOOUOCEX KEEN [7092 жуу 
画面 に 表示 する ) た め の も の で す . この エ {Ж GRAPHIC TEST X ;Blue-Ram,- жут 
ËA. у し が っ j XXX XX XXX XX XX X XX 
ディ タ が ある の と な い の と で は パターン 作 マー 人 “S LED ANE 
成 効率 が 全然 違っ て きま す . a EETA ntl Š Main Memory = キリ カエ 
エディ タ の 機能 と し て , ЗА@ОВР A CODATA) Firg 
9 拡大 表示 (拡大 パタ ー ン 上 で 修正 で き ге рм he ‚а ;DATA 
れ ば な お 良い ) ЕВ А A 


@ > > —+ = X нЕ с? 
| ൭൧-80: 
は ぜひ と も ほし い ぃ 機能 で す . コピ ー は , だ 


あけ まし て お めで と う ご ざ いま す . さて 1985 年 1 月 号 の PiOPiO の 巻頭 を 飾る 私 , さん で ろ は ここ で PiO に 対す る 提言 を し た いと 思い ます . 
まず 「 い まま で に な い 誌 面 づ くり を 目指 し て ほし い 」 と いう こと で す 。 一 部 読者 より 「B 誌 の マネ 」 と た な かれ た こと も あり ます が PiO は 「 高 
品質 プロ グラ ム の 結集 きれ た 本 」 で ある で き で す . その た め に も 投稿 され る 方 も また チェ ッ ク さ れる 方 も より 吟味 され た プロ グラ ム を 作っ て 
ほし い の で す . より 洗練 され た 誌面 作り に 期待 し ます 。 決 に 「 マ イコ ン ニ スト の 心 の 寄り どこ ろ 」 に な っ て ほし い の で す . RET SAH 


ЕА ン 語 


これ は ゲー ム (特に リア ル ・ タ イム > 
ショ ン ・ ゲ ー ム ) の キャ ラク タタ を 作る た 
め の ツ ー ル ・ プ ログ ラム で す . か な り 多 く 
の 機能 を 盛り 込ん だ の で 19K バ イト に まで 
な っ て し まい まし た . | 


CE ооох 
RSE EN BIE) M 
が 2<< ç Оа) 4% 


Vir 


7,7% хә 2520 
s. "x е, 552 9,09, 
2,4/,%9, "INT MEAT: 555 


@64x24F > FOX š š dk AE 
サイ ズ を 自由 に 設定 で き 


| Nu D АЗАЛЫ а. 


| っ つま り 配 列 変数 に デー タ を 記憶 きせ る の で 
E な く , 直接 メモ リ に スト ア す る の で , 何ら 
か の 原因 で プロ グラ ム が スト ッ プ し た り , 
A+ > С RESET ボタ ン を 押し て も デー タ 
が 壊れ な い . 

ドッ ト ・ モ ッ ト , サー クル , ボッ クス , 
ライ ン , 一 列 横 ラ イン , メモ リ ・ イ ン , カ 
ソー ル ・ オ ー ト ・ イ ンク リ メ ン ト , 単色 ペ 
СҰҚ ЖАТУ АУФ, カー アル 
| 移動 量 チ ェ ン ジ , 左右 反転 , 上 下 反 転 。 ス 
| クロ ー ル ・ ア デップ 。 スク ロー ル ・ ダ ウン , 
カー ソル ・ ホ ー ム 。 ヘル フ "・ メ ッ セ ー ジ , 
НІН 2/7, コマ ンド ・ キ ャ ン モ ル ,。 エス 
ケー ブフ"・ エ デイ ッ ト ・ モ ー ド な ど 豊 冨 な コ 
— > VEE, 

Ө” > 2 4 > 2 BS4Z 12 SL H тыу УУЛУ 
| ー チ ン に より 高速 . 

| .@ デ ー タ 出 カ デバイス, フォ ー マ ッ ト の 多 
| TA. 

キャ ラク タ の 動き が わか ' る アニ メー ショ 
ン ・ モ ー ド 付 . 


| サメ の x オイ オナ ご で か  --—À L2 4 0 
2 "Ие, vo Tr ҚАЛА i ih, 
| | Қалын дарын (o тұ а 
ж. 


0, 
ns, oC MS CON 
Кен ои num 


0:7. 
入力 し 。 カセ モッ ト に セー ジ し ます 。 次 に リス 
F 2 の マシ ン 語 リス ト を 入力 し , BASIC プ 
ログ ラム の 後に モー し ます . 

の カセ モッ ト を 巻き 戻し , 一 端 電源 を 切り ま 
す . 

@ デ ィ ス ク を 持っ て いる 人 は DISK BASIC 
>, そう で な い 人 は Ngss-BASIC を 立ち 上 
げ ま す . DISK BASIC の と き , "How many 
files ? (1 dead сәс тікі ELETAT VL 
て くだ る さい 
限定 き Des L»'L. ന 
セー ブ に は 支障 あり ませ ん . 


ログ ' ラ ム を ロー ド し ます . 
あし と は BASIC の RUN コマ ンド で 起動 し 


о マイ コン ニス ト の カカ を 結集 きせ まし ょ 
E hayta кш, 


0 で も いい の で す が 。 機能 が 


⑳ 先 ほど モー ブ し た だ た BASIC と マシ ン 庄 の プ 


話題 と 明る き に 満ち た も の に し て ほし い の で す 。 MED k 
2, し て ほし い ば っ か り い っ て いる 私 で す が 。 


Pattern / 1 
D FF 00 ҒЕ:00 FF Q@Q:FF 00 FF:00 FF 00: 


Шеж М! 


2 ҒҒ 00 ЕЕ Йй FD 00:ҒҒ മമ FF:00 FF 00: ; 
今 メ モリ に ある デー タ (B.R.G. の 順に 並ん を で いる ). デ ー タ ・ リ スト アウ ト ・ オ 


ドッ ト 番 号 リ ジ ナ ルフ ォ ー マ ッ ト も 同様 


約 2 ~ 3 秒 後 に タイ トル 画面 が 表示 る れ ま 


19 98779 まさ 564 
у я 6 r: TE 


1. ж ж 


タイ トル ん 画面 が 表示 され た だ 時 点 で . まず 
必要 事項 を 設定 し ます . すなわち , 以前 エ 
ディ イッ ト し た パタ ー ン に 修整 を 加え る だめ, 
周辺 デバ イス か ら デ ー タ を ロー ド す る か , 
新しい パタ ー ン を 作る だ た だめ に ドッ ト 数 や パパ 
ター ン 枚 数 を 設定 する わけ で す . 
ー タ ・ ロ ー ド (コマ ンド 1) 
Ra СТ, КВ) 
※FD: フ ロッ ピー ディ スク 。 CT : カセ 
ッ ト ・ テ ー フ , KB: キー ボー ド 
ロー ド デ ー タ ・ フ ォ ー マ ッ ト 
オリ ジ ナ ル ‥… こ の プロ グラ ム 専 用 フォ ー 
യ. HS. bela a 
Ngs-BASIC7 7 4 Jv---Nss -BASIC の ファ 
イル に よる デー タ ・ ロ ー ド 。 
ファ イル ・ ネ ー ム 入力 (FD, CT の み ) 
ドラ イブ 番号 入力 (FD, ボー レー ト 入 
Jg (CT). FD, CT は これ で 終わ り . 
OHF v huo KEF > F 3k, パパ ター ン 枚 数 , 
デー タ 入 力 パ ター ン 番 号 を 入力 . する と 画 
面 が クリ ア さ れ , その パタ ー ン の デー タ が 
16 進 数 で 表示 る れ ま す ( 図 1). そし て , ж 
ニタ の E コ マン ド と 同じ 要領 で デー タ を 入 
力 し ます (カー ソル ・ キ ー, 数 値 キ ー, [RET 
URN] キー で エス ケー ジ ). 
新しい パタ ー ン ・ メ イク (コマ ンド 2 ) 
а 
ト ま で 指定 PTY, 
@ 綻 の 最大 ドッ ト 数 (2 ドッ ト か ら 24 ド ッ 
ト ま で 指定 可 ). 
パタ ー ン の 枚数 (設定 可能 最大 数 は パタ ー 
ン の 大 きる に よっ て 異な る ). 


移 デー タ ・ エ リア を クリ サリ デ す る か どう か >:。 
前 述 の よう に メモ リ 本 位 で ある だ め 。 クリ 


ア す る か どう ヵ か: は ここ で の 答 に よっ て 決ま 
る . [Y] キー また は [NNI キ ー. 
プロ グラ ム ・ エ ンド (コマ ンド 3) 

この プロ グラ ム か ら 抜 ける こと の で きる 
Ш--ОХ-ал-, これ を 指定 する と 簡単 な 
メッ セー ジ を 残し て BASIC の コマ ンド ・ レ 
ベル に 戻る . Р 


2. メ イン ° メニ ュー 

タイ トル 画面 で て で, 1 また は 2 を 選択 する 
と , メイ ン ・ メ ニュ ー に 実行 が 移り ます . 
メイ ン ・ メ ニュ ー で は 6 種 の コマ ンド を 選 
АСУУЯ Se yk ШЕЯ 
パタ ー ン ・ エ ディ ッ ト 

画面 構成 は 図 2 の と お り . AEIR- 
ター ン ・ エ リア が あり ます (最大 値 64 ド > 
F x24 ド രത്നം. — 
に 情報 ダーン が あり , р Hi 
ター ン の 実際 の 大 きる で の ター hos: 
示さ きれ て いま す . 

最初 (0。 0) の と ころ で 点 減 し て いる の が 
カー ジル で , これ を カー ソル ・ キ ー で 動か し 
て エディ ッ ト し ます . この モー ド で は 前 述 
の よう に 22 種 の コマ ンド を サポ ー ト し て い 
EE 
[0] -[7] キー : その キー の 番号 と 対応 し た ド 
ッ ト を カー ン ソル 位置 に モッ ト . 
カー ソル ・ キ ー: カー ソル を カー ン ソル 移動 
ഗ്‌ നെയിം. 


ょ 情報 ゲー ン "MOVING STEP" の 最初 


о 46 рн, 
82 エディ ッ ト 画 面 レ イア ウト 


と 言わ れる マイ コン ニス ト 達 を 明る くし て くれ る よう な 本 に し て ほし い の で す .。 たとえ ば, イラスト, PiOPiO, 情報 局 な ど で も , より 情報 と 
ぅ うな 誌面 を 作る た め に は . みな さん の 力 が 必要 な の で す . どう か PiO の 発展 の た め に 
今年 も PiOPiO の 方 で が ん ば る つも り で す . 微々 た る カカ 


3 (SANSA) A | 141 
e un A an i ў 547; Баха mu^ w 5% 
рҮ ERE ar AE a AEN ക്ട: ൨ 


[B| #— : BOX ( 箱 ) を 描く ん . - こ の コマ ンド 
が 入力 され だ と き の カ ー ン ソル の 座標 と 赤い 
カー ソル に よっ て 指定 し た 座標 の 2 点 を 頂 
点 と し て BOX を 描く . 
[С] キー : CIRCLE (円 ) を 描く 
座標 を 円 の 中 心 と し て 赤い カー ソル に よっ 
て 半径 の 大 きる を 指定 . だ だし, この コマ ン 
ド は 真 円 の み . 
[E] X —: ESCAPE EDIT MODE. メイ ン 
・ メ ニュ ー に 戻る コマ ンド 。 た だ し 。 この 
ターン を メモ リ に 登録 し て いな けれ ば , XE 
録 す る か どう ヵ 嘆 ね て くる の で [Y] キー か [N] 
キー で 答え 5. 
[F] #— : BOX FULL ( 箱 塗り つぶ し ) を 
描く . 操作 方 法 は B コ マン ド と 同じ . 
П] E — : AUTO INCREMENTON/OFF 


カー ソル 


SWITCH, オー ト ・ イ ング クリ メン ト と は 


[o|] |Z| キー に よっ て ドッ ト を モッ ト し た 
後 , カ ー ソ ル が 移動 する もの.|I| キー を 押す 
FE, オー ト ・ イ ンク リ メ ン ト 機 能 が ON/O 
FF す る . カー ソル の 移動 量 な よび 方 向 は 

"MOVING STEP" の 第 2, 第 3 番目 の 数 
が 表わし て お り , Z t ZT X Jin) GR) の 


移動 量 。 Y 方 向 ( 縦 ) の 移動 量 を 示し て いる . 


を し で これ ら の 数 値 は 5) ON に し だ と き - に 
"Const change? " に 対し [Y| キ ー を 押す 
こと に よっ て 変え られ る (Const と は XY カ 
ー ソ ル 移 動 量 の こと ). 
[L] キー:LINE を 描く . 操作 方 法 は B コ マン 
ド に 準ずる 
[M| キー : MEMORY IN. 編 集 し た パタ ー ン 
を メモ リ に 登録 する . 1 回 の 編集 で 1 回 も 
この コマ ンド を 使わ な けれ ば メモ リ に 登録 
さき されない. その と き は E コ マン ド で ESCAPE 
する と き に |Y| キー を 押す . も し , 編集 し た 
パタ ー ン が 気に入ら な けれ ば |[N| キー を 押せ 
ば メモ リ に 登録 され ず , 前 の パタ ー ン が そ 
の まま 残る . 
[Р] キー : 単色 ペイ ント . カー ソル 位置 か ら 
指定 し た 境界 色 で ペイ ント する . な お , メッ 
モー ジ 中 の "Border Color?” と は 境界 色 
et, 
[S] キー : カー ソル 移動 キー を 押し た と き の 
カー ソル 移動 ステ ッ プ ' を 変え る . 
[T] キー : Tiling Paint を 行なう . カー ソル 
位置 か ら 指定 し た 境界 色 ま で 人 色 を 塗る の は 
P ュ マン ド と 同じ だ が 。 ペイ ント ・ カ ラー 
に タイ ル ・ ス トリ ング が 使え る . 

この タイ ル ・ ス トリ ング の 指定 方 法 は , 
サ プ エ ディ タ を 使う . この コマ ンド を 指定 
する と , “Tiling Lengs?" と 聞い て くる の 
C, タイ ル の 縦 方 向 の 長き を 入力 (た だ し , 
の と 6 ま で )。 す る と イン フォ が メーション ・< 

リア に 横 8 ド ッ ト で , 縦 は 指定 し だ な タ イル 
の 長き の サイ ズ の エディ ッ ト ・ エ リア が で 
き る 。 

HOME 位置 で 点 減 し て いる カー ソル を 操 
作 し て メイ ン ・ エ ディ タ と 同じ 要領 で タイ リ 
ング ・ パ ター ン を 作る . た だ し , 使用 可能 キ 
ー は カー ソル 移動 キー と ヒド ッ ト ・ セ モット (O| 
-|7|%-) DA, 終わ っ た ら |IRETURN| + 
ー を 押し 。 サ プ エ ディ タ か ら 抜 け , 境界 
色 を 指定 する . 

[MI キー : イン フォ メー ショ ン ・ エ リア に 現 


エディ ッ ト 画 面 


ഉര്‍ | 122456 89ABCICT 


! 
3 
: 
: 
H 
3 
ы 


在 編集 中 の パタ ー ン が リア ル ・ サ イズ で 表示 
きれ て いる が 。 これ を 消し だ と き に 周囲 と 
同化 し て し ま - い , ക്ത 
эле и Nita GANSU QK B SCG 

て わく を 作る . わく が 表示 る れ て い je t 
き に この コマ ンド を 実行 する と わく が 表示 
ъп, わく 〈 く が 表示 され て いる こき は わく が 
消え る . 
[X] キー : 横 方 向 に パタ ー ン を 反転 (裏返し ) 
する. 
|Y| キ ー : 縦 方 向 に パタ ー ン を 反転 (裏返し ) 
3 5. 
ICTRL| キ ー 十 El キー: 横 1 列 に ライ ン を 
指定 色 で 引く <. 
[ROLL UP| キ ー : パタ ー ン を 1 F z F, А 
クロ ー ル ・ ア ッ プ する . 

ROLL DOWN キー : パターン を 1 ドッ ト 、, 
スク ロー ル ・ ダ ウン する . 
[HOME |t — : カーン ル を HOME 位 置 に 移動 . 
た だし, この コマ ンド は |SHIFT| キー を 
緒 に 押す 必要 は な い . 
(RETURN | キー : BASIC ス クリ ー ン ・ エ デ 
ィ タ 同様 に 改行 処理 を 行なう . すなわち XX 
座標 を 0 に し , Y 座 標 に 1 を 加え る . 
[GRAPH] + + [С] + : パタ ー ン ・ ク リ 
7, MELECI AGF D 
ー と し て クリ ア す る . 
[HELP] キー : これ ら の コマ ンド の 意味 の 簡 
単 な 説明 . 
|sTOP| キ ー : コマ ンド ・ キ ャ ン モ ル . 上 記 
の コマ ンド を 庄 まっ て 指定 し たり , キャ ン 
セル し だ た だい とき に 実 行 す れ ば キャ ン セ モル で 
き 5, 
パタ ー ン ・ セ ー プ 

編集 し た パタ ー ン の デー タ を 周辺 デバ イ 

に セー し ます . 使用 可能 な デバ イス は 
フロ ッ ピ ーー ディスク, カモ ッ ト ・ テ ー プ の ど 
ちら か で 。 RS-232C じ や スク リー ン ・ デ ィ ス グ 
VAs TUS RETR TST STA A 
クリ ー ン や ピリ ンタ へ は デー タダ ドリ スト ・ 
デア ウト を 使い ます . 

セー プ ・ フ フォー マット は オォ オリジナ ル , BA 
SICO7T—2A2Z2X, vli acid ファ イル と 3 
種 の 指定 が 可能 で この うち , BASIC D 
АТА Ж, N88 BASIC フ ァイル は 起動 し た と 
る と オー プン する ファ イル 数 に 対し 1 ЫЕ 
を 入力 し な いと 使え ませ ん . 

bL. も モー デー グセ も よう た ルイ て いる デー タタ の 
762 827) 77.1 (だ た だ し 。 キー ボー ド は 
除く ) か ら ロ ー ド し だ も の な ら 画 面 に “ 
と いう よう た 表示 きれ ます 。 ご こ で * 何 も A 
カ せ ず に [RETURN] キー を 入力 し た ら ロ ー 


ド し だ と き と 同 ビ じ フ ァイル ・ ネ ー ム が 指定 


SAULT. それ 以外 の と き は きち ん と ファ 
イル ・ ネ ー ム を 入力 し て くだ る さい. 

いつ 何 を 入力 する か と いう こと は その 時 
々 の 画面 の メッ セー ジ に 従っ て くだ る 
デー タ ・ リ スト ・ ア ウト 

編集 し だ た パタ ー ン の デー タ を プリ ンタ , 
TAA FZ RANGA A ha TY ОН 
x F TUR TITY КК TEA, 
BASIC の DATA X, ЯУ ジ ナ ルル 形式 の 3 
種類 が あり , オリ ジ ナ ルカ か - 番 見 や すい と 
私 は 思い ます . : 

ダン プ 形 式 は この デー タ を マシ ン 語 の ダン 
デ ・ リ スト で 見 る も の で す 。 オリ ジ ナ ル は 
デー タ ・ ロ ー ド の キー ボー ド 入 力 の と き の 
画面 構成 と ほぼ ば 同じ で す . この モー ド で も 
画面 の メッ セー ジ に 従っ て くだ きい . 
パター ン ・ ム ー ビ ン グ 

アク ショ ン ・ ゲ ー ム に お いて は , パタ ー 
ン は 同じ 方 向 の も の を 何 パ ター ン ヵ *: 作 っ て 
お いて デニ メー ショ ン 的 な 効果 を 出し て い 
る も の が は ほとんど で す 。 この モデ ボド は ER 
いっ た だ 動き を シミ ュ レ ー ト し よう と いう も 
の で す . 

まず , 動 パ ター ン を セレ クト し て くだ きる 
v. 指定 し た だ パター ン 順 に パタ ー ン を 表示 
し ます . マター ン は 最初 真ん中 に あり ます 
മ്‌, カー ソル ・ キ ー に より 上 人 下 左右 に 動き 
++. 終わ る と き は |RETURN| キー を 押し 
て くだ さい 
バターン ・ コ ピー 

アニ メー ショ ン を 実現 する だ ため に は 。 Ін) 
じ よ うな パタ ー ン を 複数 用 意 せ ね ば な り ま 
ぜん が 。 この モー ド に よっ て 同じ パタ 2 
と 多数 を 作る こと が で きま す .。 

マス ター バターン (コピ ー す る 元 の >* タ 
ー ン ) と コピ ー バ マター ン (コピー 先 の パタ 


ー ン ) の 2 種類 を 選ぶ と 確認 し て くる の で 


[Y] キー か [N| キー で 答え て くだ きい. [Ү|& 
ー の と き は パタ ー ン ・ コ ピー を 行ない , メイ 
ン ・ メ ニュ ー に 戻り ます . [NI キ ー の と き は 
初め (パタ ー ン ・ モ セレ クト) か ら や り 直 し 
ӛт; 
リタ ー ン ・ タ イト ル 

プロ グラ ム を 終わ り だ た いと き , 新しい サ 
イズ (大 きき さき) や パ マター ン 枚 数 を 設定 し た 
Ез, 別 の パタ ー ン ・ デ ー タ を ロー ド し 
だ た いか る な だ どら 届 を 使い まこ അല്‍ 
ぶ と タイ トル ん 画面 に 戻り ます . 


3. セレ クト ・ モ ー ド 


メイ ン "・ メ ニテ ニュー で パタ ダーン ・ エ ディ ッ 
F, ターン ・ ム ー ビ ン グ 。 SHY Dn 
ビー を 選ぶ と エディ ッ ト す る フ パターン, 動 
か す ッ マタ ー ン 。 コピ ー す る パタ ー ン を 選ぶ 
た め に , この モレ クト ・ モ ー ド に な り ま す 。 

初め (1, 1) の 位置 に 青い ワイ ヤー カー 
ソル が 表示 きれ て いる の で ,。 カー ソル ・ キ 
ー を 使っ て 目的 の パタ ー ン の と ころ まで カ 
ー ソ ル を 動か し て くだ きい .。 Z UT, 目的 
の パタ ー ン の 上 に ワイ ヤー カー ソル が 来 だ 
な ら 「RETURN| キー を 押し ます . その パタ 
ー ン が 。 エディ イッ ト ・ フ パパ ターン な り ュ ピー 
2 パタ ダー ン な り 。 ムー ビン グ ・ パ ター ン に な 


る TU T. 


(882൧ 2 4 087-0 / Ë eod $3) 


KOC (O) Ж ОРС-8801тк 15450 C fr ë š L. 友達 の こわ し た [STOP] キー の ぉ お か げ で , キー ボー ド 全 部 か える と 言う の で す . bibe, P. 
gue % ба” みん な で mkII の ゲー ム を 作ろ う (ちな み に 僕 は 88mkII の ユー ザー で す ). | 


セレ クト 画面 


32) Pattern Edit CC 
i る 3 


ഉ അ MU м 


Select Edit Pattern, 
& ? 


も し 準備 の と ころ で , パタ ー ン 枚数 を 41 
以上 選ん だ と き , 画面 上 に は 5 x 8 パター 
ン し か 表示 きれ ませ ん . それ 以上 の パパ ター 
ン を 指定 し た けれ ば |SPACE| キー を 押し て 
くだ さき るい. 次 の 40 パ ター ン が 出現 し ます . 
そし て 最後 まで いく と , また 初め の 40 ン パタ 
デジ に 戻る と いう 訳 で す 。 

Hide, パタ ダー ンー ム ーー ビン グ の と き 。 г 
の セレ クト ・ モ ー ド に 入る と 何 回 も モレ ク 
ド 導 る よう に 要求 し て きま すか: ет 
上 選ば な く て も いい と いう と き は [1]| キ 
ー を 押す と セレ クト ・ モ ー ド か ら 抜 け 。 7 
ダー ン ・ ア ニメーション に 移り ます . 


前 述 の よう に ,。 この プロ グラ ム は BASIC 
( 約 19K バ イト ) と マシ ン 語 (1.5K^*4 PF) 
か ら 成 っ て いま す 。 BASIC が メイ ン で す 
pî, 一 部 を 除い て 処理 速度 は ほとん ど 間 題 
あり ませ ん . 

N88-BASIC の 命令 は 一 般 的 に 人 遅く, TF 
に グラ フィ ッ ク 処 理 関係 の 命令 は 遅い の で 
特に 遅い と 思わ れる も の に 関し て は マシ ン 語 
サブルーチン に し て あり ます . ま た, BASIC 
プロ グラ ム の 速度 の 向上 と メモ リ の 節約 の た 


1000 '9999999999099990999090990999090999999090909 
1010 “%%9%9%% қ に スス テッ 
1020 “%%% CC PATTERN EDITOR 11 
1050 “9%% ver Pet 
1040 “൭൭൭ 
1050 ‘eve 
1060 'e€ee 
1070 “൭൭൭ 
1080 “%%% 
1090 “൭൭൭൭൭ 
1100 ൭൭൭൭൭൭൭൭൭൭൭൭൭൭൭൭൭൭൭൪൭൭൭൭൭.൭൭൭൭൭൭൭൭൭ 
1110 CLEAR ,&HD4FF:O0N STOP GOSUB *STOP.K 
EY:STOF ON: SF=Q 
1120 ON HELF GOSUB *MSG.:HELP ОҒҒ:ОМ ERR 
OR GOTO *ERROR. 
1150 GOSUB *INIT:AA6-USRA4(Q):FOR C-0 TO 7 
: COLOR= (C,C) : NEXT 
1140 ' ======== 
1150 *TITLE:CLS:COLOR 6:5Е=@ 
1160 PRINT SPC (10) "ww. 
WEISE шабытты REET 
1170 PRINT 5РС (10) " ШЕ 
ни mm m അ и 

1180 PRINT SPC (10) " 

EU кеше 
1190 PRINT SPC(10)" ШЕ 

[ ളി 
1200 FRINT SPC (10) അ 
m 


For NEC PC-8801 /MK2 


Copyright (C) 1984 
By Tsuyoshi Momose 


1220 PRINT SPC (16) അ 
E um m um | _ um um 
1230 PRINT SPC(160" Wa 
ы E ш шш 
1240 PRINT SPC(16)" അ 
ജേ ірі 
1250 PRINT SPC (16) "www Gw БҰНЫ 
п сес KS RAEN TEE 
1260 COLOR 4:PRINT CR$SFC(28)"V er s i 


b. ブロ グラ ム は マル チ ・ ス テー トメ ント 
多用 , 命令 の 詰め 込み , 非 構造 化 さ きれ て い 
ます . | 
マシ ン 語 の 置か れ て いる アド レス は D500H 
ーDAFDH 番 地 で , 他 に DBO00H か ら 256 バ イ 
NTPs EV TE БЫ зб г > TUT. 
で すか ら , PC-8801 mk IH の 拡張 パッケ ー ジ 


03 メモ リ ・ マ 


vm 


N88-BASIC 
イン ター プ ブリタ 


ROM 


テキ スト ・ ウ イン ド 
DISK コー ド 


PC-8801 mkII 用 
拡張 命令 ルー チン 


N88- BASIC 
ワー ク ・ エ リア 


COLOR 2:PRINT СКФ5РС(20); "Copyright 
1984 by Tsuyoshi Momose 
COLOR 7:PRINT CR$CR$SPC(23)" 


PRINT SPC(24)"1 ss Append Pattern 


PRINT SPC(24)"2 ... Make New Patter 
ns"CR$SPC(24)"3 --- End 
1310 COLOR 1:PRINT CR$SPC(22)"Select Num 
ber of MENU.L[1—31":COLOR 7:AA=USRS (മാ 
1520 *CMD.LP:C-VAL(INKEY$):IF С<1 OR СОЗ 
THEN #CMD. LP 
1550 ON С GOTO *D.LOAD,*D.NEM, #END. 
1240 "ニニ ニニ ニニ ニニ Patterns data load ニニ ニニ ニニ 
1550 *D.LOAD: SF=1:PRINT CHR$ (12) SPC (5) "Г 
ГГ Pattern Data Load 111 
1360 РКІМТ СКФ" -Which device ?":CL-CSRL 
IN-1 
1370 PRINT" 1) Floppy Disk"CR$" 
Cassette Tape"CR$" 3) Key Board 
1380 *DL.LPO:LOCATE 17 ,CL:DV=VAL (INPUTS ( 
1)):IF DV«1 OR DV>3 THEN *DL.LFPQ 
1390 IF DV-1 AND DR-Q THEN PRINT"Can't u 
se Disk drive.":GOTO *DL.LPQ 
1400 PRINT DV; СКФСКФСКФСКФ: IF DV=3 THEN 
*KEY. INP 
1410 PRINT" -What file format ?":CL-CSRL 
ІМ-1 
1420 PRINT" 1) Original File"CR$" 
2) N88-BASIC File 
1450 *DL.LP1:LOCATE 21,CL:FO-VAL (INPUTS ( 
1))s IF FO«1 OR ҒО>2 THEN *DL.LP1 
1440 PRINT ҒО; СКФСКФ: ОМ DV GOTO *L.DISK, 
*L.TAFE 
1450 *L.DISK:PFRINT СКФ" -Drive number ? 
"S: DR ま =INPUT ま も (1 ) sPRINT DR$CR$ 
1460 IF УА (DR$)<@ ОК VAL (DR$) >DR THEN ж 
L.DISK 


バターン ・ エ ディ タ BASIC リ スト 


・ エ リア や DISK コ ユー ド が あっ て も この プロ 
グラ ム は 走り ます . 


パパ ターン ・ デ ー タ は 5000H —7000H まで 
の 間 に 格 納 さ れ て いま す . 必要 が あれ ば BA 
SIC を 止め て テキ スト RAM を アク セス で 
きる モニ タ を 使っ て 必要 な アド レス ゥ に 転送 


US а ж 


о 


7 


BASIC 


テキ スト 


19.25K バ イト 


1470 *ER.RET1:INPUT" -What is the file п 
ame ? ",FILE$ 

1480 I-INSTR(FILE$,"."):1IF I>@ THEN FILE 
$-LEFT$(FILE$,1-1) 

1490 I-INSTR(FILE$,":"):1IF I>@ THEN FILE 
$-RIGHT$(FILES$,LEN(FILE$)-I) 

1900 F.NAME$-DRS$-":"«FILE$-4".dat":PRINT 
CR$"Loading ""FILES"s 

1510 IF FO=2 THEN *L.N88 ELSE BLOAD Ғ.МА 
ME$,DATPTO: GOTO *MAIN.RD 

1920 *L.TAPE:CL-CSRLIN:FRINT" -Cassette 
Read Speed ? 

1550 PRINT" 1) 1200 bps'CR$" 2) 600 
bps 

1540 *DL.LP2:LOCATE 22,CL:SP$-INPUT$(1): 
IF 50%<>"1" AND SP$<>"2" THEN *DL.LF2 
1550 PRINT: INPUT" «What is the file name 
? "FILES 

1560 IF F ロ =2 THEN F.NAME$-"cas"«SP$-":"4 

FILE$:GOTO *L.N88 

1570 CTRL$-"r"«SP$-":"-FILE$*CHR$(13)-4CH 

R$((2)*"goto*main.rd"*CHR$(13) 

1580 FOR Ісі TO LEN(CTRL'$) : POKE &HEFDB-*I 
,ASC(MIDS$(CTRL$,1,1)):NEXT 

1590 POKE &HEFCD,LEN(CTRL$)-1:PFOKE &HEFC 

E, 31: COLOR 0: MON: END 

1600 *L.N88:0PEN F.NAME$ FOR INPUT AS#1: 
INPUT#1 。MX ,MY , MN 

1610 POKE DATPTO,MN:POKE DATPT1,MY:POKE 

DATPT2,MX-1 

1620 FOR I-Q TO ((MX+7) ¥B) *MY*3*MN: INPUT 

#1,0:РОКЕ DATPT3S+I,D:NEXT 

1650 CLOSE#1: GOTO *MAIN.RD 

1640 *KEY.INP:FRINT"Width -*-**-*- From 2 

dots to 64 dots 

1650 *KILPO: INPUT" -How many 'X' of the 

pattern ? ",MX 

1660 IF MX=@ THEN MX=USR の (DATPT2)+1 

1670 IF МХ<2 OR МХ>64 THEN *KILPO ELSE P 

OKE DATPT2,MX-1 


143 


| リリ スト 1 パタ ー ン ・ エ ディ タ BASIC リ スト 


1680 PRINT CR$"Length From 2 dots 
to 24 dots 

1690 *KILP1:INPUT" ・How many 'Y' of the 
pattern ? ",MY 

1700 IF MY=Q THEN MY=USR® (DATPT1 ) 

1710 IF MY<2 OR MY>24 THEN *KILP1 ELSE Р 
OKE DATPT1,MY 

1720 МАХ=12284% ( ( (MX+ ブ ) ദാ *MY*3): IF MAX» 
255 THEN МАХ=255 


1750 PRINT CR$"Patterns ---- Until"s МАХ 


1740 *KILP2: INPUT" -How many Patterns do 
you want ? ",MN 

1750 IF MN-Q THEN MN=USR の (DATPT の ) 

1760 IF ММ<1 OR ММ>МАХ THEN *KILP2 ELSE 

РОКЕ DATPTO,MN:PRINT 

1770 *KILPS: INPUT" -Edit Pattern number 
"s NUM ` 
1780 IF NUM«1 OR NUM>MN THEN *KILP3 

1790 РО=((МХ+7)#8) *MY*3* (NUM-1) +DATPTS:B 

S=PO 

1800 PRINT CHR$ (12) "Pattern / "МОМ; SPC (20 
) "Escape -- L[RETURN1"; { 

1810 FOR Y=1 TO MY:PRINT CR$RIGHT$(STR$( 

Y),2)" "(РОК X1 TO (MX*7)*8 

1820 FOR 1=1 TO 3:PRINT RIGHTS ("O"+HEXS ( 

USRO(PO)),2)" "s:PO-PO*1: NEXT 

1850 PRINT СНКФ (29) ":"; : МЕХТ X,Y:CX-0:CY 

=0:КХ= ( (MX*7) 8) *9 

1840 *KILP4: AA=USRS (മാ :LOCATE СХ+5,СҮ+1: 

CM$-INPUT$ (1) 

1850 ОМ INSTR(COMD1$,CM$) GOTO *kR,*kL,* 

KU, *K D 

1860 IF СМ%>-"0" AND СМ%<-"9" THEN *KLSK 
IF 

1870 CM$=CHR$ (АЅС (СМФ) + (СМФ>="а" AND CM$ 

<="+") ж«КН20) 

1880 IF СМ%>-"А" AND CM まく ="F" THEN *KLSK 
DP 

1890 IF CM$<>CHR$ (15) THENX*KILP4 ELSE PR 
INT СНКФ (12) "79° Edit シマ スカ ? "; 

1900 *KLLPS:AN$-INPUT$(10:IF AN$-"y" OR 

AN$-"Y" THEN PRINT"Y"CR$:GOTO *KILP さ ELS 

E *MAIN 

1910 *KR:CX=CX-(CX+2<KX)-((CX-1) MOD 320 
AND СХ+2<КХ) + (СХ=КХ-2 AND CY+1 く MY ) * (KX— 

2):IF СХ>@ THEN *KILP4 

1920 *Кр: СҮ=СҮ- (СҮ+1<МҮ) : БОТО *KILPA 
1950 *KL:CX2CX*(CX-1»20)*((CX-3) MOD 5-0 
AND СХ-1>=0) - (СХ=@ AND CY>Q) ж (КХ-2) :ІҒ 
CX«KX-2 THEN *KILP4 

1940 жк(:СҮ-СҮ%(СҮ-1>-0):60Т0 *KILP4 
1950 *KLSKIP: AD-CX-3*CY*120-&HF 440: PRINT 
CM$; :C1-VAL ("&h" -*CHR$ (PEEK CAD) ) ) 

1960 IF CX MOD 5-0 THEN CD=C1*16+VARL ("&h 
"+СНК% (PEEK (AD+1))) ELSE CD=VAL ("&h" * CHR 
Ф (PEEK (AD-1)))%16+C1 

1970 POKE В5%(КХҰ9) «ЗжСҮ%(СХҰ9) ഥാ M 
OD 3,CD:GOTO *KR 

1980 "= ニニ ニニ ニニ ニニ New Patterns Making ===== 
1990 *D.NEW: SF=1:PRINT CHR$ (12) SPC(S) "ГГ 
[ Мен Patterns Маке 111 
2000 PRINT CR$"Width 
to 64 dots 

2010 *LENGTH.INP:INPU"" «How many 'X' of 
the pattern ? ",MX | 


2020 IF MX=Q THEN MX=USKY (DATPT2) +1 

2050 IF MX«2 OR MX>64 THEN *LENGTH. INP 
2040 PRINT CR$'"Length From 2 dots 
to 24 dots 

2050 *WIDTH.INP:INPUT" -How many 'Y' of 
the pattern ? ",MY 

2060 IF МҮ=@ THEN MY-USRO(DATPT1) 

2070 IF MY<2 OR МҮ>24 THEN *MIDTH. INP 
2080 MAX=122 コ 4\(((MX+ ブ ) ¥8) *MY*3)0: IF MAX» 
255 THEN МАХ-255 

2090 PRINT CR$"Patterns = ・・・・ Until"; MAX 
2100 *NUM. INP: INPUT" -How many Patterns 
do you want ? ",MN 

2110 IF MN-Q THEN MN-USRO(DATPTO) 

2120 IF ММ<1 OR MN>MAX THEN *NUM. INP 
2130 PRINT СКФ" -Patterns area CLEAR ? " 


From 2 dots 


` 

2140 Y$-INPUT$(10:1IF Y$="y" OR Y$="Y" TH 

EN DEF USR9-XHD71D:AA-USR9 (മാ 

2150 POKE DATPTO,MN:POKE DATPT1 。MY : PUKE 

DATPT2,MX-1:GOTO*MAIN.RD 

2160 ' ======== Program End ======== 

2170 *END.:PRINT CR$"Thank you for using 
“РАТТЕКМ EDITOR' program. 

2180 PRINT"See you Again ! Good-Bye ж 

2190 SCREEN 0,0:0М ERROR БОТО Q:END 

2200 ' Main routine 

2210 *MAIN.RD: MN-USRO CDATPTO) : MX=USRØ (DA 

TPT2) *1: MY-USRO (DATPT 1 ) 

2220 POKE &HF2E8, (МХ+7) *B: PUKE  &HF2E9 , MX 
MOD 8:POKE &HF2EA 。 MX 半日 

2250 *MAIN:CLS: AA=USR4 (0) : SF=Q 


N 

2250 COLOR 7:РКІМТ SPC(26)"1) Pattern Ed 
it 

2260 PRINT SPC(26)"2) Pattern Save 5 р 
isk,Tape 

2270 PRINT ЗРС (26) "3) 
rinter 。Di spl ay 

2280 PRINT ЗРС (26) "4) Pattern Move 
2290 PRINT SPC(26)"5) Pattern Copy 


Data list out F 


2300 PRINT SPC(26)"6) Retrurn to Title 
2310 COLOR 4:РКІМТ CR$CR$SFC(28)"Which d 
о you select ? "::COLOR 7: AA=USRS (Ø) 
2320 *REINP:M-VAL(INPUT$(1)):IF M«1 OR M 


,26 THEN *REINF ELSE PRINT М 


2330 ON М GOTO *P.EDIT,*P.SAVE,*P.LIST,* 
MOVING,*F.COPY,*TITLE 

2240 ' ======== Pattern Edit ======== 
2550 *F.EDIT:SF-2:1F MN=1 THEN N=0: GOTO 
#PE SKIP 

2560 MS6$-" >>>> Pattern Edit <<<<"+5РА 
CE$ (23) +"Select Edit Pattern. " : GOSUB *SE 
LECT 

2370 *PFE.SKIP: NUMzN: PXzQ:PYz0: ST=1: SX=0: 
SY=Q: FL=Q: MF=0: WF =0: WC=0: SF= の 

2580 SCREEN ,1:CLS: Rn=USR4 (の) : POKE &HF2E 
Ø, NUM: AA=USR2 12585 


2590 АА-(М5К1(0):УІЕМ(521,5)-(658,27),1,2 

2400 WINDOW(O,0) —(MX-1,MY-1): VIEW(S36,68 
)-(555%МХ,67%МҮ) 

2410 *HELF. RET: AA=USR7 (МХ#256+МҮ) : HELP О 

N: COLOR 6: AA=USRS (0) 

2420 LOCATE 66,1:PRINT"PA TT ER N":LO 

CATE 67,2:1PRINT"ED I.T O R 

2430 COLOR 4:LOCATE 65,7:PRINT"-Pat Num” 
*"sLOCATE 65,12:PRINT"*X = Y = 

2440 LOCATE 65,13:PRINT"-Auto increment" 
:LOCATE 65,14:PRINT SPC(7);"*-** 

2450 LOCATE 65,15:PRINT"-MOVING STEP: 

2460 LOCATE 65,17:PRINT"-MODE**-":LOCATE 
65,18: PRINT" - INFORMATION 

2470 COLOR 7:LOCATE 66,4:PRINT"Copyright 
1984":LOCATE 68,5:PRINT"(C) by T.M 

2480 LOCATE 75,7:PRINT USING"###%" ; NUM* 1 
:LOCATE 76,14:РКІМТ"оҒҒ 

2490 LOCATE 68,16:PRINT ST;SX; SY: SF-2 

2500 *E.LP:LOCATE 69,12:PRINT USING"##"; 

PX:LOCATE 76,12:PRINT USING"##"3 PY 

2510 LOCATE PX*1,PY*1:CM$-INPUTS$ (1): エニ IN 

STR (COMD1$,CM$) : AA=USRS (0) 

2520 IF І>0 THEN ON I GOSUB *RIGHT,*LEFT 
,*UP,*DOWN:GOTO *E.LP 

2530 IF CM も >=" の " AND CM$i-"7" THEN *DOT. 

SET 

2540 CM$=CHR$ (ASC (CM$) + (CMS >= "а" ) *HH20) : 
IF СМФ-"Е" THEN *E.END 

2550 ON INSTR (COMDO$ ,CM$) БОБОВ *CIR,*IN 

C,*LINE. ,*BOX ‚+В. FULL, #MEM, *PAINT. ,*CSTE 

P,*TILE, *XTURN, *YTURN , *WIRE , *CLR , *ROLLUP 
|, *ROLL DOWN , *HOME , *RET , *WL INE 

2560 AA=USRS (0) : GOTO *E.LF 

2570 *RIGHT:PXzPX-* (PX+ST>=MX) ж CAX-1) - (РХ 
*ST«MX) *ST: RETURN 

2580 ж ЕҒТ:РХ-РХ-(РХ-5Т<0) + (МХ-1) + (PX-ST 
220) *ST: RETURN 

2590 *UP:PYzPY-(PY-ST«Q) * (MY-1) + (PY-ST>= 

Q) *ST: RETURN 

2600 *DOWN: PY=PY+(PY+ST>=MY) #* (МҮ-1) – (РҮ+ 

ST<MY) *ST: RETURN 

2610 *DOT.SET: COL-VAL (CM$) : PSET (PX,PY) ‚С 

OL 

2620 FOKE &HD6CE,COL: AA=USRS (&HC281-*PX«*P 
Y*640) 

2630 IF FL THEN PX=PX-(PX+SX<MX AND PX+S 
X220) *SX:PY-PY-(PY-SY«MY AND PY+SY>=Q) *5 
Y 

2640 GOTO *E.LP 

2650 *CIR:LOCATE 73,17:PRINT"CIRCLE 

2660 LOCATE 65,19:PRINT USING"CENTER (## 
_##)";PX,FY 

2670 GOSUB *SUB.CUR: RD-SQR ( (RX-PX) ^2* CCR 
Y-PY)*2) ^2) 

2680 IF RD-Q THEN AA=USR8 (Ø) : RETURN 

2690 LOCATE 65,20:PRINT USING"Radious=## 
"RD 

2700 LOCATE 65,21:PRINT"Circle Color ?"; 
:GOSUB *COL.INF 

2710 CIRCLE (PX,PY) ,RD,C: QR= ニ USR 1 (0): АА=05 
R8 (Ø) : RETURN 

2720 *INC:IF FL THEN FL=@:LOCATE 76,14:F 

RINT"off":RETURN ELSE FL--1 

2730 LOCATE 76,14:PRINT"on ":LOCATE 65,1 

9:PRINT"Const Change ?"; 

2740 *INCLPO:AN$-INPUT$(1):IF AN$-"N" OR 
AN$-"n" THEN AA=USR8 (Ø) : RETURN 

2750 IF AN$«»"Y" AND ANS< >"у" THEN *INCL 

РФ 

2760 LOCATE 65,20: INPUT"'X' step ? ",SX: 

LOCATE 65,21:INPUT"'Y' step ? ",SY 

2770 LOCATE 68,16:PRINT.ST: SX: SY: AA-USRS 
(Ø) : RETURN 

2780 *LINE.:MD$-" LINE":MD-1:GOTO *LINE. 

SUB 

2790 *BOX:MD$-" BOX":MD-2:GOTO *LINE.SUB 

2800 *B.FULL:MD$-"B.FULL": MD=3 

2810 *LINE.SUB:LOCATE 73,17:PRINT MD$ 

2820 LOCATE 65,19:PRINT USING"Start (WM 
,##) U; PX, ,PY:GOSUB *SUB. CUR 

28:0 LOCATE 65,20:PRINT USING"End ("n 
,3HO "SRX,RY 

2840 LOCATE 65,21:PRINT "Line Color ?";: 

GOSUB *COL.INF 

2850 IF MD=1 THEN LINE(PX,PY)-(GRX,RYO,C 

2860 IF MD=2 THEN LINE(PX,PY) -(RX,RYO ,C, 

B | 

2870 IF MD= さ THEN LINE(PX,PY) -(RX,RY) ,C, 

BF 

2880 AA=USR1 (0) : АА=05К8 (Ø) : RETURN 

2890 #МЕМ: AA=USR6 (NUM) : МЕ =-1: RETUR 


2900 *PAINT.:LOCATE 73,17:PRINT"PAINT 

2910 LOCATE 65,19:РКІМТ USING"PAINT (44 
»##) "{РХ,РҮ 

2920 LOCATE 65,20:PRINT"Paint Color ? "; 
: GOSUB *COL. INP: COL-C ү 

2950 LOCATE 65,21:PRINT "Border Color ?"; 
: GOSUB *COL. INP: BOR=C 

2940 PAINT നാ, ന്ന ,COL , BOR: AA=USR1 (0): АА= 

USRB (Ø) : RETURN 

2950 *TILE:LOCATE 73,17:PRINT"TILING 

2960 LOCATE 65,19:PRINT USING"Tiling (## 

сәй "S PX,PY 

2970 *TLLFPO:LOCATE 65,20:PRINT"Tile Leng 
"s: TL=VAL (INPUTS (1) ) 

2980 IF TL>@ AND TL<7 THEN *TLSKIP 

2990 LOCATE 65, ie add STRING$(1S5," ")1 

COLOR 2:LOCATE 65,2 

5000 PRINT"T.Leng PEL ca UAM 7:GO0TO *T 

LLP の 

3010 *TLSKIP:PRINT TL:AA-USRB8(Q):DIM TF( 

TL-1,2):TX2Q: ТҮ=0: TD$-"" 

3020 FOR Ізі TO TL:LOCATE 65,18+I:PRINT 

HEX$(I)": "3 3 NEXT 

5050 *TLLF1:LOCATE .67*TX,19«*TY: CM$-INPUT 

和 も (1 ) 

5040 ON INSTR(COMD1$,CM$) GOSUB *TRIGHT, 

*TLEFT ,*TUP , * TDOWN 

5050 IF СМ%>="@" AND CM$«-"7" THEN GOSUB 
*TL. DOT y 

5060 IF CM$<>CHR$(13) THEN *TLLP1 ELSE C 

OLOR 7:AA=USR8 (0) 

5070 LOCATE 65,19:PRINT"Border Color ?"; 

:GOSUB *COL. INP: BOR-C 

3080 FOR 2ടമ TO TL-1:TD$-TD$-CHR$ (ТР (I,Q 

))+CHR$ (TP (I, 1) ) +CHRS$ (TP CI , 20) ) s NEXT 

5090 PAINT (РХ 。PY ) , Тр% , BOR: AA=USR1 (0): AA= 

ОКВ മാ : ERASE TP: RETURN 

5 4001 817: TX=TX+ (ТХ >=7) *7—-(TX&7) : КЕТО 


*TLEFT:TX=TX-(TX<1)#*7+(TX>=1):RETUR 


#ТОР: ТҮ=ТҮ- (ТҮ<1) + (Т_-1) + (ТҮх>=1) : КЕ 


*TDOWN: TY=TY+ (TY*1»-TLO)*(TL-1)-(TY* 
1% TL) : RETURN 
3140 *TL. DOT:C-VAL (CM$) : IF С=@ THEN COLO 
К 7:PRINT"-"; ELSE COLOR С: РКІМТ" ЕШ"; 
3150 FOR 1=0 TO 2:50-С AND 2^14 DT=&HB9/2 
5160 IF 50<>0 THEN TP(TY,I)-TF(TY,I) ОК 
DT ELSE TP(TY,I)-TP(TY,I) AND (МОТ DT) 
3170 NEXT: RETURN 
3180 *CLR:LOCATE 74,17:PRINT"CLS 
5190 LOCATE 65,19:PRINT"Back Ground":LOC 
ATE 71,20:PRINT"Color ?"; 
ares GOSUB #COL. INP: VIEW (556,68) ~ (599,91 

,0: VIEW(S36,68) - (535*MX, 57%МУ», C,WC 
210 AA=USR1 (മാം AA-USRB (0) : RETURN 

3220 *HDME : P X=@: РҮ=0: RETURN 
5250 *WLINE:LOCATE 73,17:PRINT" WLINE":L 
OCATE 65,19:PRINT"Line Color ?"; 
5240 GOSUB *COL.INP:LINE((GO,PY)-(MX-1,PY) 
,C: nn= ニ USR 1 (Ø) : AA=USR8 (Ø) : RETURN 
5250 *КЕТ:РХ=0: РҮ=РҮ- (РҮ+1<МҮ) : RETURN 
2260 *XTURN:DEF USR9-X&HDA52: AA-USR?9 (0) : К 
ETURN 
3270 *YTURN:DEF USR9=&HDB22』 AA-USR?9 (0) : R 
ETURN 
3280 *CSTEP:LOCATE 65,19: INPUT"Moving St 


| ep"; ST: АА=05К8 (Ø) : RETURN 


5290 *WIRE:IF WF THEN WF-O0:WC-0 ELSE WF= 
-1:WC=7 

5500 УІЕМ(556,68)-(555%МХ,67%МҮ),,АМС:КЕТ 

URN 

5210 *ROLLDOWN: DEF USR9=&HD9D 1 : АА=05К (の 
) : RETURN 

5520 *ROLLUP:DEF USR9-&HD880: АА=05К5 (Ø): 
RETURN 

5550 *E.END: SCREEN Q:HELP OFF:IF MF THEN 
*MAIN 

3340 LOCATE 55,19:PRINT"Do you save":LOC 
ATE 65,20:PRINT"this Pattern ?"; 

5550 *END.LP:Y$-INFUT$(1):IF Y$-"Y" OR Y 
$-"y" THEN AA-USR6(Q0):GO0TO *MAIN 
3360 IF Ү%<>"М" AND ҮФ<>"п" THEN *END.LF 
ELSE *MAIN 

3370 *SUB.CUR: RX= ニ PX 』 RY-PY: COLORG (1,1) ~ (M 
X,MY),2 

3380 *SC.LP:LOCATE PX*1,PY*1: CM$-INFUT$( 
1) 

3390 IF CM$-CHR$(13) THEN COLORG(1,1)-—(M 
X,MY) , 7: SWAP PX,RX: SWAP PY,RY: RETURN 
5400 ON INSTR(COMD1$,CM$) GOSUB *RIGHT,* 
LEFT , *UP , *DOWN: GOTO «*SC.LP 

3410 «COL. INP:COL$=INPUTS (1):IF COL$«"Q" 
OR COL$>"7" THEN *COL. INP 

3420 PRINT COL$: C-VAL (COL $) : RETURN 

5450 "==w====== Pattern Save ======== 
5440 *P.SAVE:SF-3S:PRINT CHR$(12)" >>>> 
Patterns Save くく くく "CR 

5450 IF DR= の THEN PRINT"Device = Tape":D 
V=2: GOTO *PSSKIP 

3460 PRINT" -Which device ?"CR$" 4) F 
loppy Disk"CR$" 2) Cassette Tape 

5470 *PS.LPO:LOCATE 17,2:DV=VAL (INPUT $ (1 
))sIF DV<1 OR DV>2 THEN 05. 100 

3480 PRINT DV; СКФСКФСКФСКФ 

5490 *PSSKIP:PRINT" -What file format °?" 


区 初め まし て , PC-1251 の ユー ザー で す . 夏 の ある 日 の こと ょ です. PRO モ ー ド で お も わ ず K. と 入力 し て し まっ た の で す . あわ て て 直 そ うと 思 

っ た ら “KEY" と 入力 し て あっ だ の で す . これ で 他 の 物 も る が し て みる と "COMS“"。 “ERROR”, “OFF”, “DEBUG”, "OUTSTAT", "IN- | 0 
ғ, STAT”, "ROM", TORUM Oo CP tao a LR, し か L, これ ら の 使い 方 は 全然 わか り ま せん . だ れ か 知っ て い る 人 は PiOPiO ТЕСУ 
: GONE TER S. | SUPER S 


"wie es 


$ 
い 


m ^ ചി s 
ന്യ EE 
പ RS 1 


:CL-CSRLIN-1 

5500 PRINT" 1) Original file"CR$" 2) 
N88-BASIC file"CR$" 3) Data of Basic 
5510 *PS.LP1:LOCATE 21,CL:FO-VAL (INPUTS ( 
1)):IF FO«1 OR FO>3 THEN *FPS.LF1 

5520 PRINT FO; CR まじ CR まじ R ま CR まま 

5550 IF FILE$«»"" THEN PRINT "These patte 
rns's File Name ・・ "":iFILE$; ”; 

5540 INPUT" -What is the file name ? ",F 
% 

5550 IF F$«»"" THEN FILE$-F$ ELSE IF LEN 
(FILE$)»6 THEN ЕП ЕФ-і ЕҒТФ(ҒІ1Е%,6) 

5560 I-INSTR(FILE$,"."):IF I»Q THEN FILE 
$-LEFT$(FILE$,1I-1) 

5570 I-INSTR(FILE$,":"):IF I>@ THEN FILE 
$-RIGHT$(FILES$,LEN(FILE$)-I) 

3580 РКІМТ:ОМ DV GOTO *DISK.SAVE,*CAS.SA 
VE 

3590 *DISK.SAVE:PRINT" -Which drive numb 
er ? "si:DR$-INFUT$(1) 

5600 IF VaL(DR ま ) く の OR VAL (DR$) >DR THEN Р 
RINT: GOTO *DISK.SAVE 

3610 PRINT DR$:F.NAMES$-DR$-*":"«FILE$-4".d 
at 

3620 PRINT CR$"Saving "'""FILE$",":IF FO=2 
THEN *S.N88 ELSE IF FO=3 THEN *рАТАЅТ 1 
5650 BSAVE F.NAME$,DATPTO,MN* ( CMX*7) #8) + 
MY*3+3: GOTO *MAIN 

5640 *CAS.SAVE:PRINT" -Which is the Cass 
ette speed ?":CL-CSRLIN-1 

3650 PRINT" 1) 1200 bps"CR$" 2) 600 
bps 

3660 #CAS. LPO: LOCATE 32,CL: SP$-INPUT$(1) 
:IF SP$«"1" OR 5РФ>"2" THEN ൭൧൧൭. LPO 
3670 PRINT SPSCRSCRSCRSCRS "Saving ""FILE 
$",.,":IF ҒО-2 THEN F.NAME$-"cas"«SP$-":i"- 
FILE$: GOTO *S.N88 

3680 IF FO=3 THEN DV=-1:F. NAME$="cas"+SP 
$+": "+FILE$: 3070൨0. DATA 

5690 F.NAME$-2"w"-SP$-":"-FILE$*",5000,"- 
HEX $ (MN* ( (MX+7) #8) *MY*S*DATPT3) *CHR$ (13) 
*CHR$ (2) *"goto*main"*CHR$ (13) 

3700 FOR 1=1 TO LEN(F.NAME$) : РОКЕ &HEFDB8 
+І,АЅС (МІР%Ф (Ғ. МАМЕФ, 1,1) ) : МЕХТ 

2710 POKE &HEFCD,LEN(F.NAME$)—-1:POKE НЕ 
FCE 。 さ 1 : COLOR 0: МОМ: END 

5720 *S.N88:0PEN F.NAME$. FOR OUTPUT AS*1 
:PRINT41,MX; МҮ; MN; 

1750 FOR І-0 TO ((MX+7) ¥8) #MY#S#MN: PRINT 

*1,USRO(DATPTS«*I):;:NEXT ^ 

5740 CLOSE#1: GOTO *MAIN 

5750 *DATA.ST1:DV-2-1:F.NAMES$-DR$-«FILE$:G 

OTO *B. DATA 

3760 '======== Pattern Data Le out === 

ニニ ニー ニニ 

3770 *P.LIST:SF=3:PRINT CHR$(12)" >>>> 

Pattern Data List out くく くく 

3780 PRINT CR$"-List out device ?":CL=CS 

RLIN:PRINT" 1) Printer"CR$" 2) Display 

5790 *PLLPO:LOCATE 20,CL-1:DV-VAL (INPUTS 
(1)): IF DV く 1 OR DV>2 THEN *PLLPQO 

3800 PRINT DV; CR$CR$CR$CR$" -Data list ou 

t format ?":DV-DV-2:CL-CSRLIN-1 

3810 PRINT"  12Dump"CR$" 2)Data of BASI 

C"CR$"  3)O0riginal 

3820 *PLLF1:LOCATE 25,CL:FO-VAL (INPUTS (1 
) ) si IF ҒО<1 OR FO>S THEN #PLLP 1 

5850 PRINT FO; СКФСКФСКФСКФ: ОМ ҒО GOTO жр 


UMF , *DATA. STO, *ORG. 

3840 *DUMF: INPUT" -Address ---- &h",AD$:I 
F LEN(AD$) »4 THEN *DUMP 

(5850 ST$-"SIZE --- X="+STRS (МХ) +" Y="+ST 


R$ (МҮ) +" 2420-"-STR$ (NM) 

3860 ST1$=SPACE$ (7) +" ———— ———— ——,.— —— —4À 
"tST2$-2"Format | RED | BLUE IGREEN I 

3870 ST3$=SPACES (7) +" —— ən 
":*ST4$-SPACES (7) +" | One Data | 
3880 PRINT ST1$CR$ST2$CR$STZ$CR$ST4$: IF 

DV THEN LPRINT ST1$CR$ST2$CR$ST3$CR$ST4$ 
3890 PRINT CR$ST$CR$:1F DV THEN LPRINT S 
T$ 

5900 ST-VAL("&h"-AD$):ST$-"Add +Ø +1 +2 
+3 +4 +5 +6 +7 +8 +9 +A +B +C +D +E +F 
5910 FRINT ST$:1F DV THEN LPRINT ST$ 
3920 FOR AD=Ø TO MN*((MX*7)X8)*MY*Z-1 ST 

ЕР ൦: ST ま =RTGHT ま ("の の の "+HEX ま (QRD+ST) ,4) 
5950 FDR I=0 TO 15:8T$-ST$-«" "«RIGHT$("Q 
"*HEX$ (USRO CAD* I*DATPT3)) ,2) : NEXT 

3940 PRINT ST$:1F DV THEN LPRINT ST$ 
5950 МЕХТ:РКІМТ CR ま も SPC(1 の ) "Push [RETURN] 
key to return MENU. 

3960 *PLLP2:1F ІМКЕҮ%<>СНБФ(15) THEN *PL 
LF2 ELSE *MAIN 

5970 *DATA.STO:IF DV THEN Ғ.МАМЕФ-"Іір%й: 
": GOTO *B.DATA ELSE *B.DATA 

3980 *ORG.:ST$-"Pattern's size 一 一 一 Х="+5 
TRS (MX) +" ("+STRS (PEEK (&HF2EA) ) 

3990 ST$-ST$«-"byte) Y="+STRS (МҮ) +" マイ スウ = 
"-STR$ (MN) 

4000 CO-DATPTS:PRINT CR$ST$CR$:1F DV THE 

М LFRINT ST$CR$ 

4010 FOR N=1 TO MN:ST$-"Pattern /"+STRS( 

N) sFRINT ST$:1F DV THEN LPRINT ST$ 

4020 ST$-"":FOR Y=1 TO MY: ST$=RIGHTS (STR 
%(Ү),2)%" ":FOR X=1 TO PEEK(&HFZ2EA) 

4050 FOR Ісі TO 3:ST$=ST$+RIGHT$ ( "0" +НЕХ 

$ (USRO (CO) ) , 2) : СО=С0+1 : NEXT: ST$-ST$-«":" 
4040 NEXT:PRINT ST$:1F DV THEN LPRINT ST 
$ 


4050 NEXT Y,N:PRINT CR$SPC (10) "Push CRET 
URN] key to return MENU. 

4060 *PLLP3:IF ІМКЕҮФ< >СНАФ (13) THEN #PL 
LP3 ELSE *MAIN 

4070 ' ======== Pattern Move ======== 
4080 *MOVING:SF-3:MSG$-" >>>> Pattern M 
oving <<<<"+SPACES$ (10) +"Select Move patt 
erns. (Until 254 Fatterns) 

4090 ON KEY GOSUB *F.1:KEY (1) ОМ: РО=%Нр 
воо 

4100 *MVLPO:GOSUB *SELECT:FOKE РО, М: РО=Р 
O*1:IF FO>&HDBFE THEN GOSUB *F.1 ELSE +m 
VLPO 

4110 *F.1:IF PO-&HDBOO THEN RETURN *MOVI 
NG 

4120 CLS: AA=USR4 (0) : КЕҮ (1) OFF:RETURN ж 
MVSTART 

4150 *MVSTART:PP-£&HDBOO:NX-40: МҮ=25: DEF 
USR9-&HD9?4B 

4140 MVX-BO-PEEK (&HF2EB8) : МУҮ-50- (MY+7) #4 
:PRINT LEFT$(MSG$,26)SPC(20) "Escape --- 
LRETURN] " : GOTO*MVSKIFP 

4150 ൦00൦01 : ടമ: SY=Q: INB-INP (8) : IN1 の =IN 
F (10) 

4160 IF (INP(1) AND &H8Ø)=Ø THEN AA=USR4 
(QO):GOTOX*MAIN ' 

4170 IF (IN8 AND 2)-0 THEN SY--1:5SX-0 
4180 IF (INS AND 4)= の THEN SX=1:SY=Q 
4190 IF (IN10 AND 2)=@ THEN ടട : GX= の 
4200 IF (IN10 AND 4)-0 THEN SX=-1:SY=Q 
4210 МХ=СХ- (СХ+5Х<МУХ AND СХ+5Х>=0) *SX:N 
Y=CY-(CY+SY<MVY AND CY+SY>1) «SY 

4220 *MVSKIP: AA-USR9 (CCY*320--CX-&HCOQOQ) : Р 

ОКЕ &HF2EQ0,FEEK (PP) 

4230 AAG-USR2(NY*320--NX--&HCODOQD) : РР=РР+1: І 

F РР-РО THEN PFP-&HDBOO 

4240 CX-NX: CY=NY: GOTO*MVLP 1 

4250 ' ニニ ニニ = ニニ = ニニ = Pattern Сору ニニ ニニ ニニ ニニ 
4260 жР.СОРҮ:5Ғ-5:М50%-" >>> Pattern С 

ору <<<<"%5РАСЕФ(20) *"Select master patt 

ern. 

4270 GOSUB *SELECT:SPzN: MSG$-LEFT$ (MSG$, 

39)*"Select Copy pattern. 

4280 БОБОВ *SELECT: CP=N: AA=USR4 (0) : PRINT 
CHR$ (12) LEFT$ (MSGS, 19) 

4290 PURE &HF2EQ,SP: AAsUSR2(&HC327):POKE 
&HF2EQ , CF: AA=USR2 (&HC337) 

4500 FOKE &HE6Bó6,1:LOCATE 16。USR の (DATPT 1 
)\16+1sFRINT "—--"CHR$(28); 

4510 LOCATE 0,5: РКІМТ "Раё. пцт. • • "ЅР" 

СНКФ (28) " "СР; : РОКЕ &HE6B6 。 の 

4520 LOCATE 5,6: РКІМТ"Маѕёег Pattern 

ору Pattern"CR$CR$"Sure ?L[y/nJ] "; 

4550 *PCLF:AN$-INPUT$(1):IF AN$-"N" OR A 

N$-"n" THEN жР.СОРҮ 

4540 IF АМФ<>"Ү" AND АМ%<>"у" THEN *PCLFP 

4550 DEF USR9-KkHD7EE:AA-zUSR9 (СР#252+5Р) : 

GOTO*MAIN 

4360 ' ҰҰҰҰҰҰҰҰ Sub.1 --- Pattern Select 
ҰҰҰҰҰҰҰҰ 

4570 *SELECT:POKE ЕНҒ2Е0,0:В5-0:СХ-0 :СҮ- 

Ø: N= の 

4580 SCREEN 0,1:ПЕҒ USR9=&HDBDE : AA=USR9 ( 

MN) : PRINT MSG$:GOTO ж55КІР 

4590 *SELPO: INB-INP (8) : INV92INP (9) : IN1 の =I 
NP (10) 

4400 IF (INP(1) AND &H8U)-0 THEN RETURN 
4410 IF (IN8 AND 2)=@ THEN SY=-1:5X=0: GO 
TO *DELINE 

4420 IF (INB AND 4)=Q THEN SX-z1:SY-20: GOT 
O *DELINE 

4450 IF (IN10 AND 2)-0 THEN SY=1:5X=9:G0 
TO *DELINE 

4440 IF (IN10 AND 4)=@ THEN SGX=ー1 : SGY= の : 6 
OTO *DELINE 

4450 IF (IN? AND &Н4@›<>@ THEN *SELPFO 
4460 BS-FEEK (KHF2EQ0) : AA=USR? (MN) : PRINT M 
55%:СХ-0:СҮ-0 

4470 IF BS>=MN THEN В5=0: GOTO %55КІР ELS 
E *SSKIP 

4480 *DELINE:LINE(CX*80*12,CY*358*16) - (CX 
*80-20-MX,CY*358*19*MY) ,0, В 

4490 МХ=СХ+ (СХ+5Х 57) *7- (СХ+5Х<0) *7- (СХ+5 
X«8 AND СХ+5Х>=0) *SX 

4500 МҮ=СҮ+ (СҮ+5Ү>4) *4—(CY-SY«40) *4—- (CY+S 
Ү<5 AND CY«*SY»-0)*SY 

4510 N-BS*NY*8-*NX:IF МММ THEN CX=NX:CY= 
NY ELSE N=BS+CY*8+CX 

4520 *SSKIP:LINE (CX*80*12,CY*58*16) - (CX* 
80+20+МХ ,СҮ#58+19+МҮ) ,1,B: БОТО *SELPO 
4550 ' ҰҰҰҰҰҰҰҰ Sub.2 --- Making ‘DATA’ 
statesment in BASIC ¥¥¥¥¥¥¥¥ 

4540 *B.DATA:LX-PEEK (&HF2E8) : NB-LX*MY *3* 
MN: ヒロ = の 

4550 PRINT "Line Nude --- From 1 to"655 
28 '-(NB¥15) 

4560 *BDLPO: INPUT" -Line Number "3; LN: IF 
LN«1 OR LN>65528'-(NB¥15) THEN *BDLP の 
4570 IF DV THEN OPEN F.NAME$ FOR OUTPUT 
AS#1 

4580 PRINT LN"DATA "s:LN-LN*1:IF DV THEN 
FRINT#1 ,LN-1"DATA "; 

4590 FOR І-0 TO MN-1:PD$-HEX$ (MX) +" ,"+HE 
X$ (MY) : GOSUB*DATPRT 

4600 FOR 1-0 TO MY-1:FUR K=@ TO 2:FOR L= 
の TO LX¥2-1 

4610 DA-LX*MY*3S*I-LX*J*3*K*L*6*DATPTS3 
4620 PD$-HEX$((USRO (DA*3) *256+USRO (DA) ) : G 


リス ト 1 バタ ー ン ・ エ ディ タ BASIC リ スト 


OSUB *DATPRT 

4630 NEXT:IF LX MOD 2-1 THEN FD$-HEX$(US 
RO(LX#MY#S#I+LX#J+K+L#3) ) : GOSUB *DATPRT 

4640 NEXT K,J,I:PD$-2"-1":GOSUB #DATPRT: I 
F DV THEN CLOSE#1 

4650 PRINT CR$CR$SPC(12)"Push [RETURN] k 
ey to return MENU. 


| 4660 *BDLP1:IF ІМКЕҮФ< >СНКФ (15) THEN *BD 


ІРІ ELSE *MAIN 
4670 *DATPRT:PRINT PD$;:IF DV THEN PRINT 
*1,PD$; 
4680 CO-CO*1:1F С0=15 THEN С0=0: РКІМТ CR 
$LN"DATA ":i:LN-LN-*1:1F DV THEN PRINT#1,C 
R$LN- 1 "DATA "ss RETURN ELSE RETURN 
4690 PRINT", "s3 IF DV THEN FRINT981,","::R 
ETURN ELSE RETURN 
4700 ' $4$9$99$9$* Initialize $$9$9$9$9$9$ 
4710 *INIT:DEFINT A-Z:WIDTH 80,25: CONSOL 
E 0,25,0,1: SCREEN 0,0,0,0: COLOR 7,0,0,0 
4720 IF PEEK(&HDSQQ)«»&HDS5S OR PEEK (&HD5Ø 
8)«»&H70 THEN ERROR 100 
4730 DEF USR=&HDOBO: AA=USR (Ø) :DEF USRO-& 
115൦2: DEF USR1=&HD5B4: DEF USR2=&HD662 
4740 DEF USR3=&HD&C8: DEF USR4=&HD6E6』 DEF 
USRSz&H35D9 
4750 DEF USR6-&HD73B: DEF USR7=&HD78A: DEF 
USR8-&HD7B1 
4760 COMDO$-"CILBFMPSTXYWbUIL"*CHR$ (12) +C 
НКФ (15) +CHR$ (5) 
4770 COMD1$-CHR$ (28) +CHR$ (29) +CHR$ (30) +C 
НКФ (51) : CR$-CHR$ (10) +СНКФ C13) 
4780 DATPTO-&HSO00: DATFT1-DATPTO-*1:DATPT 
2=DATPTQ+2: DATPT3=DATPTO+S 
479@ DR=PEEK (KHEC7D) : AA=USRS (の) : OPTION В 
ASE @:РОКЕ &HE6O4C, 0: RETURN 
4800 ааа Сошпалаы List === 
4810 *xMSG.:HELP OFF: SCREEN ,3:CLS:SF-0 
4820 COLOR S:LOCATE 23,2:PFRINT"ses*«*« Com 
mands List жж” 
4830 COLOR 7:PRINT:PRINT"LIQ1-[71 ...-.... 
М2 e AV dot.» TIA "4 
4840 POKE &HE6B6,1:PRINT" ["CHR$(30)"JL[" 
CHR$ (31) "JE"CHR$(28)"JE"CHR$ (29)"] ・・ カー 
YL 7 АМО" РОКЕ &HEG6B6,0 
4850 PRINT:PRINT"EL[B23 ......-..... 322 77 
: രം I Э NI 
4860 РКІМТ "СЕЈ IT ィ w ト t-h^ Л 
3 ヌケ ル [F] 1 ത x= 
4870 PRINT"EIJ Auto Incremen 
t ON/OFF CLI 1:9: eg 
4880 PRINT" LNM] Pa 9 メモ そり 2 
トリ イレ ル [P] 9251527 へ N° イィ イット 
4890 PRINT"CS] カー ソル 2 イト "ウリ ョ 
? Э カエ ル CTI 0429" ヘイ ント 
4900 PRINT" [WI № ダー / オオ キサ 
э シメ ス [X] 939 №72 
4910 PRINT"[Y1 22° 95° リウ テン 
СЌНЕЦРЈ ・・・・ IT уль 
4920 РКІМТ"СБКРНЈ2+СС 7 № ター ン 9 ケス 
LCTRL 1%ГЕ12 зу / 542 
4950 РКІМТ"ІКЕТ1 -.-...... キャ リッ シド リターン 
CCLRI ・・・・・・・・ カー ソル Э ж-д" 
4940 PRINT"CROLL UP] ・・・・ 1h wk スズ フロ ー ル 
2" CROLL DOWNI ・・・ 1h"wh ズ フ ロー ル 
TP 
4950 COLOR 6:PRINT CR$SFC(17)"Push any 
ey to retrun to Edit mode. ": AA=USRS (0) 
4960 *xMSG.WAIT:IF INKEY$-"" THEN *MSG.WA 
т 
4970 COLOR 7:CLS: SCREEN ,1:HELP ON:SF-2: 
RETURN *HELP . RET 
4980 ' —— Stop key Trap 
4990 *STOP.KEY:IF SF-Q THEN RETURN 
5000 IF SF-1 THEN RETURN «TITLE 
5010 IF SF-2 THEN AA-USRB8(9):COLORG(1,1) 
—(MX,MY) ,7:LOCATE 73,17:PRINT SPACES (7): 
ERASE TP:RETURN *E.LP 
5020 IF SF=3 THEN CLOSE: KEY OFF:RETURN ж 
MAIN 
S030 7 = Error Trap — 
5040 *ERROR.:1F ERR-5 AND ЕКІ -5010 THEN 
RESUME NEXT ELSE COLOR 2:BEEP 
5050 IF ERR=100 THEN *ER100 
5060 AA=USRS (0) : IF ERR-52 THEN *ERS2 
5070 IF ERR=6 THEN ഫലം 
5080 IF ERR-S3 THEN *ERS3 
5090 IF ERR=56 THEN *ERS6 
5100 IF ERR-S AND ERL-3090 THEN *ERS 
51182 COLOR 7:END 
5120 മമ: PRINT "キカイ 3 7*n07"54 3 g-h" 
シテ カラ КОМ 2779“ サイ 。 "COLOR 7:END 
5150 *ERS2:PRINT"File 77 ന്‌ タリ マヤ セン 。 RESET 
シテ カラ File number n 1 イル а? = :/、 ア ラダ タメ テ RU 
М シテ フタ ~ t. "s COLOR 7:END 
5140 *ER6: PRTINT "キテ イ / NI 9 ニュ ウリ ョ の 2,775 
サ ィ 。"s COLOR 7: RESUME 
5150 *ER5 さ : PR INT "ソノ ヨウ ナ File name » ミリ カリ 
vt» ''"CR$ 
5160 COLOR 7:FILES VAL (DR$) : PRINT: RESUME 
*ER.RET1 ; 
5170 *ERS6:IF LEFT$(F.NAME$,4)-"l1ptQ" TH 
EN PRINT"Printer can't access.": 7:AN$=I 
NPUT$(1):RESUME *MAIN 
5180 #ERS: LOCATE 65,20:PRINT"Can't Tilin 
g":LOCATE 65,21:PRINT"Try again '"; 
5190 AN$=INPUT$ (1) : COLOR 7:AA=USR8 (0) : ER 
ASE TP:RESUME *TILE 
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オデ カジ 
വന തള, ゲー ム ・ オー バー 
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E а: 2 
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リリ スト 2 パタ ー ン ・ エ ディ タ ൦78811; 


人 @ か つえ さん 好き だ 


10 READ A$, R$ 

20 FLAY А%+Е% 

1000 DATA t10018v1004e4a2r4abosc 
2r4cde2r4f 4d 2dr 4 

1010 DATA о544.ес4а4е4. 44c204b4b 
довс4а4е2.ғ4 


76) o (O) p Pi0O 受 読者 の 皆さん , お 元気 で すか ? PiOPiO の アド バイ ザー( ? ) シロ で す . ST, 今日 は ,「 後 悔し な い パ ソコ ユン の 選び 方 その 2 」 を お 届け 
Ол Ол LET. £4. と し て ゲー ム ( 特 に アド ベン チャ ー) を や り た い 人 は 、FM- 7 PC-8801 が 良い と 思わ れ ま す . KE, 77൧൫07; 
い 人 は , FM- 7 、 MSX(F—2 33 £0), S1, MZ な ど が 良い で す . も し, ビジ ネス に も 使い た い の な ら 。 РС-88/989, FM-77 な ど が 良い と 思 
C£. 最後 に , 徹底 的 に 遊び た い 人 は , PC-6001 や MSX が お すす めで す . パソ コン を 買う の は , ハー ド は も と より ,. ソフ ト を 重視 する べき 


こい だ の j 3 $ ж ч Jd 


ーー 一 * 23 De ш, ^ 
- . -- ーー ヤー ー ーーーーーーーーーー 20000 


Q 


РС-1500+СЕ-1 55+077—7 


BASIC 


ЖЕТУІ 


PC-1500 ユ ー ザ ー の 諸君 へ 。 いま ここ に 
PC-1500 版 4 人 7 並べ を お 送り し ます . 

4 人 の うち の 3 人 は ポケ コン の CPU (L 
Н-5801) 内 に ひそ ん で いま す が , その 3 
人 と いう の が な か な か の 強敵 な の で す . + 
い ぜ い ドン べべ に な ら な いよ うに , 頑張 っ て 
くだ さい 、. 


この プロ グラ ム は オー ル BASIC な の で 
リス ト ど お り 5 入力 し て も ら え ぇ えば 結構 で す 。 
な お , この プロ グラ ム に は 8KRAM と カナ 
テー ジ が 必要 で す . 

まだ , プリ ンタ 関係 の 命令 も ある の て 
E NE a SEN 
し て くだ き 


മേശ プリ ンタ 
を 接続 し て いる と き は , 場 の 状態 を ゲ リ ン 
信 に 出力 する か どう か を 聞い て きま す の で , 
[Y] か [NI で 答 を て くだ きい . ゲー ム 名 , へ ハ 
イ ・ ス コア を 表示 後 。 カー ド を 出す 順序 を 表 
示し ます ( 図 1). 

相手 は CPU 1 3 の 3 人 で す . 続い て ス 

ア を 表示 し ます . スコ ュ ア の 左 に 表示 され 
て いる の が 場 の 状態 で す ( 図 2). こ れ は プ 


リン タ の 使用 に か か わら ず 常 に 表示 し ます . 
そして, その 後 順序 に 従っ て カー ド を 出し . 


TUSSI TT, 

ST, あな た の カー ド の 入力 方 法 で す が , 
あな だ た の カー ド を 表示 し た 後 (833) CA 
力 し ます . 入力 は , カー ド の マー ク を [sl][p| 
[HI[cC| キー で , カー ド の 数 字 や 英字 は その ま 
まで 行ない ます ( 図 4). 

#12, パス を する と き は [ENTER | キー の み 
を 押し て くだ さい. パパ ス は 3 回 まで で きま 


す 。 これ な は .CPU 側 も 同じ で す 。 それ と 。 
自分 の パス し た 回 数 は リザ ー プ ・ ナ ン バ ー 
を 示す I II 皿 で 表示 し て いま す . 


41 カー ド を 出す 順番 


RES 
42 場 の 状態 と スコ ア 表 示 


к SCORE 


A 2 3 4 5 67 8 91 J Q K 


54 3 


自分 の カー ド 


RE IEEE E 


図 5 順位 表示 


CPU2. 2-599, $- cus 


1 Ж ЕРЫ 


1 
a pet 
3 位 …CPU3 x 
4 位 …CPUi 


図 4 カー ド の 指定 方 法 


210 ^ 

[C] [また は [CI 1/[2] … 

そし て あな た が 上 が る か ), 
ス を する と その 場 は 終了 し て 順位 を 表示 し 


クロ ー バ の Q 


ます ( 図 5). こ の と き ,. あな だ の 順位 が 前 


の 順位 より 下がっ ただ 場合 まだ は 最 下 位 だ 


っ た 場合 は ゲー ム 終 了 と な b, 
PERRET 
る れ ま す . 

な お , ゲー ム 終 了 の と き に あな だ た の スコ 
ア が ハイ ・ ス コア で あっ た 場合 は , 1257: 


それ 以外 の 


CT. その 中 で も , や は 5PC-8801mkII が なおす すめ です (けっ きょく 。 25121). 


まだ は 4 回 2 


を 表示 し て 次 の ゲー ム が 開始 


まで イニ シャ ル を 入力 で きま す (表示 の 関 
RECIPE TUTTI SIA ЖУУЖҰ 
使用 し た 場合 に は , 順位 、 ス コア な ど を す 
стаса. 


15170 POKE&3A00, «ТЕ, 0, &TF, 


&41, &7FiàÀ, キャ ラク タ ・ 
に 定義 文字 の “10” を 入力 する た だ た だめ の も の 
TT, それ と , ブリ ンタ の 有無 は &A000 の 
内 容 に より 判断 し まし た (255 の と き プ リン 
が たけ: 

まだ , パス の 回 数 の 表示 で す が 。 ラノ パス を 
し て いな いと き は TIM と 表示 し て い 
ます が 。 これ は 途中 で BREAK し た と き に 
テー ジャ ナン バー を 変え る こと が で で 莉 る 


= — КО ൭80 


(88mkll ユー ザー の シュ ロ ) 


147 


93 


EDOT ERO CT 
この 手 の ダ ブロ グラ ム で 重要 な の は ユン ピ 


この プロ グラ ム は , ある プロ グラ ム の 移 
植 か ら 始 め ま し だ. 始め た の は いい の で す 
ュー タ の 思考 で す が 。 ここ で は 一 切 ふ れ ま 5, この プロ グラ ム の 思考 と いう の が 実に 
+A. どう し て も 知り だ い 人 は , 自分 で プ いい か げん (失礼 の ) な も の だ っ た の で 
ログ ラム を 解析 し て みて くだ さい (勉強 に 「 こ りゃ ー い か ん わい 」 と 思い 自分 で 思考 


し だ っ て や りゃ ー で きる ん だ わい .」、 
参考 文献 
“ソフ トウ エア ・ ラ イブ ラリ HO| ", 工学 社 


な る ぞ ). プロ グラ ム を 作り , また プリ ンタ の 有無 両 
な お , この 程度 の 強 る で は 物足りな い 人 太 で 使え る よう だ 選 だ た の が この デ ロ グ ラム 

も いる と 思い ます が 。 そこ は 笑っ て 許し て Ж; 

や っ て くだ ゲ だ さき さい, ワッ ハッ ハツ ハッ 。 な お , この 7 並べ は 純粋 に 7 を 中 心 に 並 


1:РЕМ ++++++++++ 
オナ オナ ナナ オナ 
ERED АУ, 
+++ 
3: REM トド エエ デデデ デニ デデデ 
EV 
4: REM 
2: REM 
.B: IF NLET N$=" 
15214൧] 23P0KE &3 
ADA, &7F; O, &7F, 
841, &7Zr: PR=t¢ 
PEEK %80005 225 
ഠാ: CALL &38C5: 
IF PR= り THEN 42 
20: PRINT " PRINTE 


; ?. Ç 
ИМ)" 

25: 1F ІМКЕУӚ = "Үү" 
ШЕ 40 

30:]F INKEY$ ="N" 
LET РР=0: GOTO 
48 

35265010 25 

490: DIM U2, 2), A2 
2; B(3), C(3), D< 
B), EC122, E1(12 
2; 839,039, eÇ 
З, 12) 

45: 05 :RANDOM : 
GCURSOR 33: 
PRINT "ЖЖЖ 2 " 
3: GPRINT "4058 
652E447E655848 
SERENE " 
ЖЖЖ": ВЕЕР 5,50 

‚ ЭЭ 

50: А%-"105Е2Ғ5Е10 
8452012301 
BC", ൭5281 03൧ 
1C88", ൧൭൭105൧8 
[൭൧1 0", 128, 70 


=4 

959: 2$2"023456283" 
*CHR$ &804"JQK 
"sz ON PRGOSUB 5 
20 

60: ҒОР 15010 12:E 
`1)=2^]1:МЕХТ 1 
:Ег16:ҒОР 1-28 
TO 5: ESE- ]; El] 
1)=Е,Е1612-1)= 
E: NEXT I 

65:FOR 」= り TO 3: 
FOR J-28TO 12:2 
(],J)=]+(J+1)2⁄ 


188: NEXT 2:01 


)=13:МЕХТ 1 

20:ҒОЕ 15010 3:B( 
1221; PC 1224, G< 
1228, ൧125൧6) 
; NEXT 1:Нғ3, G= 
2, 12-79 


25:ЕОЕ l=8TO 3:ñ= 


RND 4-1, B-RND 


119:CLS :PRINT 


4-1, Е=В‹А), BCA 
?=B(B), B(B)=E: 
NEXT 1 
80:РОКЕ %264Е, 113 
‘IF =gPR」NT 
USING "#H#H##H##H## 
8";"HI";N;" by 
"N$: CURSOR 2 
‘PRINT ":": 
BEEP J: USING 
85:ҒОЕ 15210 99:A 
=RND 4-1, B=RND 
4-1: IF A=BLET 
85-4൮ - (൧853൮4 
90: C=RND 13-1, D= 
RND 13-1, E=Z(A 
2 C2, 248; じ )=Z(B 
; D); Z(B, р) =Е: 
МЕХТ 1 
S5:PRINT "Card 


ue ВЕЕР: 
108: FOR 1520 3: 
FOR 5൧10 12: 
IF Z1, Jo2- INT 
ZC1,; J22. 2.77 


2C1, J228, C= 


С(12-1 
105:МЕХТ J:NEXL 1 
3*FOR 15010 3: 
IF B(I228PRINT 
ai 20500 12 


p ) 
115:PRINT "CPU"+ 
STR$ В(12; 
12൧: JE I«3GPRINT " 
28928201 ൧൧9", 


125:NEXT I:PRINT " 


ക) J 

21; 99 

130: ҒОР 5210 11: 
FOR K=J+1TOU 12 
‘IF ACO IAC 
10217 E228; J 
3, Z(8, J)=2 (9, K 
›, 2(9, КӛгЕ 

135: NEXT K:NEXT J: 
GOSUB 548 

140: CLS :GPRINT "3 
C2ABA3C22", : 
PRINI "5 "3; 
GPRINT “223൧൧8 
1422": GCURSOR 
11: GPRINT 122: 
GCURSOR 5: 
GPRINT 42: 
GCURSOR 17: 
GPRINT 42 


145: CURSOR 5:PRINT | 


SCORE #710 
150: IF PR=lFOR 1-23 
TO 2STEP -1: 
GLCURSOR (128, 
-20Ж12:С010К < 


INT RBS (1-1.5 


べ る も の で , A ま て 並べ た ら 氏 か ら 並 べ る , 
ある い は その 送 と いっ だ も の で は あり ませ 
^. また だ, JOKER は 含ま れ て お り ま せん . 
最後 に , 島根 大 に 在学 中 の 南 浩 君 へ .「 わ 


7 並べ BASIC リ スト 


)20) X3: LPRINT 
"2":NEXT 1: 
GLCURSOR (0,-1 
40) 

1 55208 15110 4: 
ВЕЕР 1, 39, 180: 
ВЕЕР 2, 39, 30: 
МЕХТ І:ВЕЕР 5: 
PAUSE : 
160: ҒОР K-8TO 3: 
CURSOR 4: PRINT 


CURSOR 5: Р=В‹К 
): ЈЕ CR)= り 
THEN 420 
165: IF R-8THEN 258 
1280: PRINT "CPU"+ 
STR$ R+" 
("+STRS СС 
ഭാ 3%; 
GOSUB 468 
125:ҒОЕ 1520 Ас 
I22-1]:NEXT 1: 
FOR 15൧10 12: 
FOR J=19T0 208 
188: IF <27<Е,12-І1МТ 
ZR; 122൮൧൧58 % 
J*INT 2൧, 12Ұ2 
JLET--80(J—-19* 
INT Z(R, 101225 


1 
185:МЕХТ J:NEXT 1: 


IF ൧ഥാഥധാഥ 
(2248(3248C424 
0 ടാഥ 0൧.72 
--8THEN 320 
190; A=- 1, В=й, С=й; 
FOR 1=8Т0 ЖІК 
Ас1)=-1ТНЕМ 20 
2 


195:C=C+1: JF ACUCR 
-], DOR CA=UCR 
-], DAND RND 2 
=1 LET ശ്വ 
1), В=] 

299: NEXT 1:Q=2(R, A 
(B2), D-XG- INT 

d5 #100, E=P (R): 
IF CCR)=CTHEN 

218 

205:1Е ACZIF E1〈D- 
12<21Е E-40R < 


1)DR «Е-2АМр 
RND 5>1+RND 2) 
THEN 320 

210: GOSUB 488: 2 <Е, 
АВ) ) =0, UCR- 1, 
В) =0‹В-1, В)-ЕЈ 
(Р-1) 

215: CURSOR 18: 
GPRINT "1C1C1C 
1ІСІСІСІС?ЕЗЕІС 
പ 
3* GPRINT Q$(0+ 


E=3RND RND 28> 


1), 

220:РБІМТ MID$ (Z$ 
Йу ө” > SEE 
ВЕЕР 3,50, 40: 
PAUSE :C(R)=C 


К 

225:0N PRGOSUB 499 
2 IF РВ=] 
GLCURSOR (0,-1 
40; 

2380: IF C(R220THEN 
4208 


4 
235: CURSOR 10: 
PRINT "OUER !! 
"oe 
GOSUB 590: 
PAUSE :6(G)-R; 
G6=G+1: IF 6൮ 
THEN 428 
240: 65(62-0, К=4: 
NEXT K:GOTO 43 
2 


250:ІРКІМТ " 
": GOSUB 460: 

CURSOR 5:PRINT 
" "o 
CURSOR 4:J2-1: 
FOR I-8TO 12: 
IF ZCR, 12-8 
THEN 265 

255+: IF J<2INT 2<Е, 
121൧1 J=INT 24 
R, 12: GPRINT @$ 
പ്രവാ, 

2602075൧, 12-ІМТ 
ച്ച്‌, 
PRINT MID$ (Z$ 
‚Р; 15; 


`265:МЕХТ 1 


220: BEEP 1: CURSOR 
225 PRINT." 
“%СЦР5ОР 22: 
INPUT F$:GOTO 


2802 

225: CURSOR 4:РРІМТ 
に ": GOTO 
320 


288: IF LEN F$<2 


THEN 220 
285: P$-2RIGHT$ (F$, 
LEN 64-10, F$= 
LEFT$ (F$, 1) 
290: 」F P$="J"LET P 


$2"11" 
295:1F P$="Q"LET P 
$="12" 
300:lF P$="K"LET P 
=" 13" 
305:1F P$="A"LET P 
$2"]" 


318: P-URL P$ 

315: D-2(F$z2"S")4CF$ 
="H" )%2+(F$="D 
")ж3+(Е%="С")% 
4: IF O=90R P<] 
OR P>13THEN 22 


9 

320:0-0-1:1Е Q(194 
0¥%2+(P>7))< 2P 
THEN 220 

325: A=-1:FOR 1=gTO 
12:1Е Z(R, 12-20 
൧. 12227 A=], 
1213 

338:NEXT 1:1F A=-1 
THEN 220 

335: Q=2(R, А): GOSUB 
480: BEEP 3, 58, 
42: ON PRGOSUB 
499: IF PR=1 
GLCURSOR (0, -1 
40; 

348: ZCR, 0228, СВ) = 
C(R2-1: ЈЕ ശാ 
>BTHEN 422 

345:K=4: NEXT ൨668 
)=R, 65641: 
CURSOR 18: 
PRINT "DUER 11 


и» 
, 


GOSUB 590: 
PAUSE 

350:FOR 1=1Т0 3:0 
=М0+С‹1) ж20+ (5 
-PCI22*18: NEXT 
1 

360:ҒОЕ 1=1Т0 13: 
FOR 5210 3: 10 
CçJ2=ILET ദാം 
FJ; 6=6+ ] 

3652 NEXT J:NEXT I: 
GOTO 430 

320: CURSOR 18: 
PRINT " PASS 

"+STRS (5-PK(R 

22" “. 
BEEP 1,205, 1 8 の 
‘PAUSE :Р«БәгР 
(R2-1 

375: IF PR)= り THEN 
390 


(380: IF 4520൧൧ %26 


4E, 22(Р(004394 
1 
385:60Т0 420 


| 398: CURSOR 13: 


PRINT "Give up 
! 1";FOR 15710 

1055ТЕР 2: ВЕЕР 
1, 1, 9:NEXT 1: 
PRUSE 

395:FOR 」= り TO 12: 
IF Z(R, 」)>gLET 
Q=2(R, 1): BEEP 
1, 240, 30: GOSUB 
488: ON PRGOSUB 
498: WAIT «PR-28 
)¥32: PRINT : 
WAIT а 

400:МЕХТ J: IF РР=] 
GLCURSOR (0,-1 
40; 


"S ©) P PiO 別 冊 か ら 教 えて の 創刊 一 周年 お めで と う ご ざ いま す .。 つい で に 私 の マイ ユン (ナイ コン ? ) 2 周年 で も あり ます (私 は "82 年 12 月 号 か ら 
Ол Ол 1I/O を よん で いる ). と ころ で 話 は 変わ り ま す が , 私 の 友達 で 私 と 同じ ころ ( 土 3 箇月 くら い ) に マイ コン 始め た や つら (2, 3 人 ) は も うほ と ん 
| ど マ イコ ン い じ っ て な いそ う で す . HSA, そん な こと の な いよ うに 末 長 く マ イコ ン ・ ラ イフ を 楽し ん で くだ さい ね と P.S.1 こ れ が 没 だ と 


59025 1 冊 か を え を ち まわ い / (Mashed Potatoes ) 


2412, 


K(R=A) 
418: CCR2 728, G(H2=R, 
Н-Н-1:ІҒ R-8 


2 CCR2213: GOTO 
360 
415: IF H2GLET К=4: 


e 
420: NEXT К:60Т0 16 


D 
430: PRINT " Thi 
$ Round is Ove 


r":FOR 1510 8 
: ВЕЕР 1; 49: 
ВЕЕР 1, 21: NEXT 
1: PRUSE 
435:FOR 15010 3: 
PRINT STR$ (J+ 
12)4"-"j 
440:1Е 6(1)=gPRINT 
"o ,"jiJlel4] 
:GDTO 4S2 
445:PRINT "CPU"+ 
SIRS 6(124","; 
450; BEEP 1, 9, 2000: 
NEXT I:GOTO 68 
り 
460: BEEP 1,20, 99:5 
=-], T=S, U-S, U= 
S; Ы=5, “=S, Ү=5, 
=5 
465:ҒОР 15൧10 3: 
FOR J-27TO 12: 
JF <0<Ј)АМр Et 
പ്‌ 0 05൧ 8‹28+ 
122 പു, J213 
420:МЕХТ J:FOR 755 
TO 9STEP -1:]F 
(DI)RND ഥാ 
1൧.൧1 831൮2 


405: [19=I19+C(R ) ネ 4 り ネ 
(Е<>02-С(02ҰЗд0 


425:МЕХТ JzNEXT I: 
LET K=4:NEXT К 


NEXT K:GOTO 43 


?2=J+]1, J=-1 


RETURN 


488: 02]NT 0:Р-(0-0 


¥100: DCO2 2DCO 
ОК ЕР): 
GCURSOR 4+P: 
GPRINT POINT < 
4*P24*2060(0*2): 
BEEP 1,2, 120: 
КЕТПЕН 

490: COLOR (INT ABS 
(0- ] . ら 5)=9) ネ 3 

495: IF P218THEN 20 
0 


508: GLCURSOR (364 
P-12X14, -28X*0) 
:LPRINT MIDS < 
Z$, P, 1): RETURN 

518:GLCURSOR (2, -1 
28):COLOR 2: 
TEXT :LPRINT " 
** 2 

XY":LF 1 

515:FOR 15210 3: 
COLOR I:LPRINT 
" — "4MJD$ (" 
TOP 2 3145 
T", 1*441, 424" 


. ". 
, 


) 
3280: JF 66])=ЙйЙ 


LPRINT " — ": 
GOTO 530 

525:LPRINT "CPU"+ 
STR$ 6(1) 

530:NEXT I:LF 1: 
COLOR J1-1: 
LPRINT "SCORE: 
"«STR$ HzLF 3: 
RETURN 


548:FOR 1=@Т0 2: 
FOR J=gTO 7:0 
1, J220: NEXT J: 


NEXT I 

S45:FOR 1=1Т0 3: 
FOR J-8TO 12: 
IF Z<], J2=8 
THEN 560 

S5S50;D=INT ZCI, J), P 
-(Z21,; J27-02%10 
D, O=0%2+(P)7) 

955:UCI-1,; O2 2UCI- 1 
; OO4*EIXP-12 

968: NEXT J:NEXT I: 
RETURN 

൭.70: TEXT :С512Е 3: 
COLOR 2:LPRINT 
"** 2 xx" 


3CSIZE 2316 3 

3725:RESTORE 800: 
GRAPH :FOR 1-8 
ТО 3:RERD Rñ, B: 
GLCURSOR (A, -2 
B*14B) 


388: READ С, р: JF C= 
-1ІМЕХТ I:LINE 
(0, 38)- (216, 30 
2; 1; 1: GLCURSOR 
(8, 180): 
RETURN 

385: LINE -(С,-20ж1 
+0), 2, CINT ABS 
ÇI=J. J383: 
GOTO 580 

398: FOR 1-49Т0 2 
STEP -1:ВЕЕР 1 

1, 30: NEXT I: 

RETURN 

600: PAUSE :PAUSE : 
PAUSE : [10511232 
00Ж(4-.712%Р(0; 
%30: IF J1»J8OO0R 
Ј]=4ТНЕМ 638 

685: 11251124 (2%J 2-J 1] 
*(J904*J12220X52X 


618: U$="+#": ҒОР J= 
ITO LEN 5ТР% М 
0: 0%=0%+"#"; 
NEXT I 

615:PRINT "SCORE : 
"M USING U$;n 
02: BEEP 10, 60, 6 
B: [15151122 USING 

628: 0N PRGOSUB 518 
$J8-2J1:O0N PR 
GOSUB 525: G0TO 


65 
638: CLS : CURSOR 8: 
PAUSE "GAME OU 


ER":FOR l=1TO 
2195ТЕР 3:BEEP 
1,1,1% МЕХТ 1: 
PRUSE 

635: M=M+M2: ЈЕ MON 
GOSUB 660 

642: PRINT USING "# 
HHHHHHHH"; "SCO 
КЕ": Мр", HI";N 

645:USING : ЈЕ PR=g 
WAIT :PRINT : 
END Ж 

650: 8052 51gzLF - 
3: COLOR 2: 
LPRINT "Н1-5СО 
РЕ: "+STR$ N:LF 
1:COLOR 2: 
LPRINT " --- ദ 
AME OVER ---": 
COLOR 8:LF 5: 
END 

668: PAUSE "HI-SCOR 

m 


гі" ВЕЕР 10, 10 


$; PAUSE :N=NM 
628:PRINT "Name (12 
9 "$4 INPUT 
N$ 


688:CLS :N$-LEFT$ 


PC-6001 用 画面 の 上 下 反 転 忌 カ ラー 変換 プログラム zf 


7 並べ BASIC リ スト 


(N$, 122: RETURN 
200:RESTORE 250 
2085:РЕар с, D: 

GLCURSOR (168-4 

C, -20*04D) 

2180: READ С, Ds IF C= 
rlTHEN 285 
215: IF C=-9RETURN 
220:LINE - 620, - 

20ж0+р), 8: GOTO 

218 
250: DATA 0, 10,2, 12 

2: Й;-1,-1,0,0 

ҙ 4 8,-1,-1; 6, 8 

; Э› 2, 5; 18, 6, 12 

ar 

1, 2, 18, 8 
251: DaTR 6, 9, -1,-1 

AS 2, 11, 18; -9, 


888: DATA 2, 4, 6, 12, 
12; 4, 18, 2, 3, 3; 
2» З; 2, 1, 9, 1, 9, 
2, 3, 8, 3, 1, S; l; ` 
9 3, 3, 3, 2; 2, B, 
y> ТЛ. 

АТА 6, O, 0,2,0 
; 18, 2; 12, 4, 12; 
6, Э, 8; 12, 10, 12 
: 12, 10; 12, 7, 6; 
py 71, 71 
882: DATA 1, 6, 6, 12, 

11, 6, 6, 8,1, 6, - 
823: DATA 0,2; 0, 8, 2 
; By 427 ЖЕ Му: 1 
2, 9; 12, 9, 9, 8,2 
? 18, 8; 12; 8; 12; 
2, 10, 2,7, 4,2,1 
9, 1,3,0 
воа: Бата 3,8, 3; 1, 5 
ر‎ l; S, 4, 2, 2, 8, 2 
ei 


801: 


PC-6001 で CG を する 人 も 多い と 思い ま 
ЖОЛАН АО 3 RT ЖАР ЕТ 

画面 の 上 下 反 転 な ど を BASIC で や ら せ る 
と 3 分 以上 か か っ て し まい ます が 。 マ シン 
語 で は 1 秒 も か か り ま せん . し か し カラ ー 
変換 は , КОМ 内 ルーチン を コー ル し て いる 
の で あま り 速 く あ り ま せん 。 こん . ど は , H 
間 色 PAINT ルー チン で も 送り たい と 思い 
TT. 


上 下 反転 


SCREEN 3 か 4 て EXEC&HDAOO を 実行 
する だ びに 画面 が ひっ くり 返り ます . プロ 
グラ ム で は [SPACE| キー を 押し て くだ さい . 
な お この マシ ン 語 は どこ に 置い て も 動き ま 
യ ടാ. ന്ന്‌; 


カラ ーー 変換 

4 色 カ ラー モー ド で 使い ます . ペー ジ は 
どこ で も 動き さき ます. RUN さ きせ る と 変換 きせ 
る 色 を 聞い て くる の で 変え だ い 色 の カラ ー 
コー ド を 入力 し て くだ さる きい. 入力 が 終わ る 


と 画面 の 色 を 変換 し て 終わ り ま す . 


bt, 入力 の と きす べ て |RETURN| キー 
を 押す と , COLOR,,1 の 画面 が COLOR, , 2 


リス ト 1 上 下 反転 プロ グラ ム BASIC リ スト 


10 А=%Нрадо: ЕОкІ5А TO A+32:READ 

D$:POKEI,VAL ("&H"*D$) : NEXT 

29 DATA 11,90,Е2,21,Е0,Ғ9,06,09, 
с5,06,20,7Е,Ғ5,14,77,Ғ1,12,25,12 
。 1 の 。F6 

36 DATA C5,01,40,00,BF,ED,42,C1, 
С1,19,Е8,С9 

40 SCREENS, 2, 2:CLS:LINE (120,59) - 
(70,100) , 3sLINE- (150, 190) ,2 

50 LINE-(120,50),4:LOCATE 0,15:P 
RINT "PC-6991 Маѕееп" ; СНКФ (11) 


69 IFSTRIG (9) -OTHEN6O 
7% EXEC А: GOTO ёё 


@$ わ が ざた くし 
の 画面 に あっ た 色 に 変換 され ます . 
PO СУИ 


1 度 試 


リス ト 2 カラー 変換 プロ グラ ム BASIC リ スト 


16 FORI-£HBBOOTORHBBZS:READ A$:P 
OKEI,VAL ("&H"*A$) : NEXT: F=&HBE さ 6 
26 ратарр, 21,35, BB, 9൨, 00,00,11 
DATAOO, 00, C5, CD, 12, 2D, CD, 78 
DATA1S, CD, BA, 15, CD, DB, 15,52 
DATALE, BE, C1, C5, DD, 7E, 66, CD 
‘6% DATACO, 15, CD, 47, 2D,C1, 13, 3E 
DATACO, BE, C2, ФА, BB, 03, 02, ZE 
9 DATAO1,B8,C2,07, BB, C9 
А=5: B=1: C=2: D=4: INPUT "ミト "リリ ョ 人 
s INPUT"f4D"iB: INPUT"73" s C: INPUT" 
7n":iD 
100 POKEF , А: FOKEF +1 , В: РОКЕЕ+2,С: 
POKEF+3, D: SCREENZ, 2, 2: EXEC&HBBOO 
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РС-1501/1 നഃ ББ 


マシ ン 語 


光 あ る 所 に 影 が ある . 隆盛 極め る パソ ンコ 
Ж, その 下 に は 数 々 の 歴史 を 作っ た ポケ 
コン の 姿 が あっ た . だ が 人 よ , 名 を 問う な 
か れ . 聞 に 生ま れ 聞 に 消え る . それ が ボケ 
コン の 運命 な の だ . 

「PC-1500 ノ お まえ を 斬る . 忍法 4 段 表 
ж, 奥義 RAM カ ー ド j 

「 グ フッ … や る な , だ が … 秘 技 床 移動 . ノ 」 

ズ ド ドド ド 「 負 けた 一 」 

「 安 心 し ろ 峰打ち だ . お まえ は まだ 若い , 
も っ と 修業 を し て くる の だ . そし て , いつ 
の 日 か 私 を 越え る の だ .」 


ォ ー ル ・ マ シン 語 で , &40F0— &5DAF 
に 入っ て いま す 。 PC-1500 ユー ザー に は 申し 


わけ あり ませ ん が 。 CE-155 が 必要 と な り ま 


+. PC-1501 で は ノー マル 状態 で まい と 思 
いま す 。 

また , モニ タ に は 1/O 別冊 "ポケ コン ・ 
マシ ン 語 入門 " 中 の モニ タ が 最適 で し ょ う 


初め に 。 リザ ー ブ ・ キ ー【 1I 〕) の どれ か 
iz, CALL&&40FO@G を リザ ー ブ し まし ょ う . 
あと は リザ ー ブ ・ キ ー を 押し て ゲー ム を 楽し 
ATA TS SL 

まず , 題 が 表示 る れ ( こ れ で 私 が 生協 と 関 
係 し て いる こと が わか る こと で し ょ う ), 次 
に デモ が 始ま り ま す . ここ で [OFF| を 押す 
പി 

き は [ENTER| を 押し まし ょ う . Z UT 
യ UE - 様 で あ 2 2: 乱数 
で ある か を [MODE | で 選ん で くだ きい . 選び 
終え た ら [ENTER| で ゲー ム ・ ス ター ト で す . 

あな た は 中 央 に 位置 する パッ ク で す . 
[2||4||6| の キー で , 上 手 に 階段 を 昇り 降り し 
て くだ るい. そし て ドア を 開け て 敵 を 誘い 
AA, ドア を 閉め て 異 次 元 へ と 葬り 去る の 
**. 

1 面 に は 4 匹 の 敵 が いま す . 敵 に 捕まり 
を そう に な っ た だ たら |pEF| で ジャ ンプ し , う まく 
TITTIES Lh. LEES. 
ナス ・ キ ャ ラク タ が 出現 し ます の で , 食べ 


キー スキ ャ ン II に つい て 


.LBL1 : ANI# (Ғ00В), FD 
SJP Е243 
CPI А, 0Е 
В75 — 0С 
СРІ А, 目的 コー ド 


4 


FD E9 F0 0B FD 


BE E2 43 
B7 0E 
9B 0C 
B7 О 


к 本 ゲー ム の 主人 公 で 3 匹 い る 
シ | 水平 方 向 に 対し て は 正確 に 追っ 
К て くる 
| 垂直 方 向 に 対し て は 正確 に 追っ 
22144: 
2 | 最短 で は な い が , と に か くし つこ 
 . | く 道 っ て くる 
びょう | 踏む と 死ん で し まう 


表 2 転送 ルー チン の 使い 方 


エン トリ ー 番 地 &45FF 
機能 グラ フィ ッ ク ・ デ ー タ を 様々 か な 形 
て 仮想 画面 &4400-&44FF に 移す 
Input А: カー ソル 位置 
X“ グラ フィ ッ ク ・ デ ー タ の 先 
頭 番地 
UH: スク ロー ル ・ カ ウン タ (F 
9-0 7 7,715) 
L : パタ ー ン の 長 さ 
YL : 機能 (00 一 その まま , 0 
| 181725, 0 2 一 白 ぬ ぬき , 0 
3 一 反転 


る と 得点 に な り ま す 。 

な お , 面 は 1 一 8 面 が 異な っ だ パタ ー ン , 
9 一 16 面 が 1 一 8 面 の 高速 取 と な っ て いま 
+. 初め の うち は Regular Mode で 16 面 を 


征服 し , Erne b Random Mode で や る と 


と に か くく “リデル な スク ロー ル を 実現 し 
с” と の 思い で 作っ た ゲー ム で す 。 その 
秘密 は グラ フィ ッ ク ・ デ ー タ の 転送 ルー チ 


: せ &FO00B 第 1 ビッ ト を 0 に 

: キ ー ス キャ ン II コ ー ル 
BREAK' 

ОМ な ら ば LBL1 へ 

: 目的 コー ド を 調べ る 


ドア の デー タ (最高 6 個 ) 
フル ー ツ の デー タ 
階段 の デー タ (最高 16 個 ) 

| 画 び ょ う の デ ー タ (最高 12 個 ) 


ン に あり ます の で , その 使い 方 の 
ます (2), 

実は これ , 前 作 の Pocket Invader で も 
使っ た ん で す よ . 興味 が あっ た だ たら 解析 し て 
< 778. 

を それから , ROM 内 ルー チン の キー スキ 
ャ ン II に つい て で す が , [ON | を 押す と 時 
走 状 態 に な る みた だい で す が , これ を 防 で 方 
法 を 説明 し ます .。 | 

PC-1500 の キー は , WINS LE 
FOO0B 番 地 の 第 1 ビッ ト が "1" に な る よう 
СӘТТЕ Т 4... ഷഡ്‌ നഗന: 
ТАК ИЕГІ СЫ ТАТТЫ 
ち に サスーン し て し まう の で , -EREL 
ESR DTT SES 1൫൭215 
UE LIS A 

gis, 音 出 し ルー チン (&E66F) に つい 
て も 同じ こと が 言え ます の で 注意 し まし ょ 
3- 


説明 を し 


S ° > 9 月 号 の The Farmer, 11 月 号 の SUFFOCATION す ご いで すね ー. あの 動き 、 サウ ンド ,、FP も サブ CPU を 直接 コン トロ ー ル する と, ここ ま 

で で きる ん だ な 一 と 思わ ず 感 激 し て し まい まし た . それ と , 10 月 号 の TRAFFIC CONTROL で , [S キー を 押し た あと た リターン を 押す と 
Sp ASS: "と 表示 きれ な に か パス ワー ド を 入力 で きる よう に な り ま す . だ た ぶん ここ で な に か パス ワー ド を 入れ る と ,。 な に か が お こる で し ょ う 

150 СС, (違っ て いた ら す いま せん ), 私 は CALL&HFE46 を 実行 し た の と 同じ こと が お きる と 思う ん で す が ど う で し ょ う ?2 (どど ん ば 大 橋 ) 


PiO 


まだ た だ た 。 ゲ ー ム は この ワー ク ・ エ リア を 参 ャ ー な マシ ン を 持っ て いな い の で 原作 と は 
照 し な が ら 進 め ら れ ま す . この デー 々 タ は & Жуз 22055 се ПО ДЬ 
5000 —&57FF に 8 面 分 あり ます . と ころ で , 立命 館 大 学 に いる 1500 ユ ー ザ 


Oo ー の 方 , お 友達 に な り ま し ょ う . do 
本 ゲー ム は , ワー ク ・ エ リア と し て 固定 ソコ ン 売 り 場 で PC-9801F2 を 物欲 し を うに 
ЖЖ (C~O, V, Y. 7), 固定 文字 変数 見 て いる の が 多分 私 で す . 

(Р%-У%) を 使用 し て いる の で , Њо PC-1500 は まだ まだ 使え る ぞ ./ PC-1350 


BASIC ブ ログ ラム と 共存 する と き に は 注 ゲー ム を や れ ば わか る と 思い ます が ,。 5 に 負け る も ん か ヵ ./ 


意 し て くだ きい . な お 詳細 を 表 3, 4 に 示 の ドア ・ ド ア を 目指 し て 作っ て いま す .。 も 
ന്‌, っ と も , 私 は ドア ・ ド ア の 走る よう な メジ 


0 Up & Down マシ ン 語 リス ト യായാ 


4SFO AE 45 D8 BF 01 8B 04 BS ОВ FD CA 6A OS AS 79 13 :62 
4600 28 А5 79 10 SA O1 BE 45 SF FD 2А FD 1А FD OA FD :F7 
4610 ВА 9А 48 47 ДА OO 6A 72 А5 79 11 8B OS BD FF DD :06 
4620 B9 07 28 SA OO BS ОО BE 45 SF 9A 6A 05 58 79 SA :D6 
4650 40 FD АВ FD 98 55 8B ЗА 48 43 44 00 55 8B 02 4A :C4 
4640 18 55 B7 ОЗ 89 04 44 50 BE OS D9 D9 D9 FD СА 54 :7D 
4650 57 2А FB Аі 79 11 B7 ОВ 83 ОЗ 28 ВЕ OD AS 79 11 :9C 
4660 FB 20 B7 OB 83 OC BD FF DD 28 64 O7 15 5А O1 BE :F2 
4670.45. SF FD 1А FD 2A BS ОВ FD DA 88 4B ба 64 ОВ 58 :56 
4680 77 5А 90 FD АВ FD 98 55 8B 27 48 42 44 38 54 57 :5F 
4690 2A ЕВ А1 79 11 B7 08 83 ОЗ 28 ВЕ OD А5 79 11 FB :А7 
46А0 20 B7 ОВ B3 ОС BD FF DD 28 6A 06 15 ЗА O1 BE 45 :65 
46BO SF FD 1А FD 2А 54 54 54 54 88 38 9A 48 44 44 OO :80 
46CO БА 72 BS OO BE 45 OO 9A А5 79 13 B7 02 83 OC 54 :Сь 
46DO 54 54 38 15 89 05 BS O1 AE 4C C7 9A 9A 9A ŞA 9 :B7 
46EO OO ОО OO OO OO OO OO OO OO OO OO OO OO OO OO OO :00 
46FO OO OO OO OO OO OO OO OO E9 79 17 OO BE АҒ 58 9A :67 
4700 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 :7F 
4710 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 :7F 
4720 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 :7F 
4730 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 :7F 
4740 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 :7F 
4750 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 :7F 
4760 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 :7F 
4770 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 :7F 
4780 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 :7F 
4790 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 :7F 
4760 6A ОЗ 58 79 SA 20 FD A8 FD 98 55 BB 40 48 42 4A :12 
47BO DO 55 D? D? D? D? FD СА ВЕ 01 02 AS 47 ВА DD AS :61 
47CO 45 D8 BF O1 8B O4 В5 ОВ FD СА 54 57 2А FB А1 79 :40 
47DO 11 B7 ОВ 83 ОЗ 28 BE OD AS 79 11 FB 20 B7 08 83 :EO 
47EO ОС BD FF DD 28 6A O6 15 SA O1 BE 45 SF FD 1A FD :C8 
47FO 2A BS ОВ FD DA 88 51 9A 6A OF 58 77 SA SO FD АВ :45 
4800 FD 98 55 8B 27 48 43 4А 40 54 57 2А FB А1 79 11 :64 
4810 B7 ОВ 85 ОЗ 28 БЕ 1D AS 79 11 BF O1 8B O2 44 48 :р5 
4820 FB 68 ОО 20 B7 OB 83 14 B7 O4 81 OB B1 OS 4А 48 :47 
4850 BD FF DD 28 6A 06 15 5A 01 BE 45 SF FD 1А FD 2А :97 
4840 54 54 54 54 88 48 9A OO 58 79 SA 70 55 89 O1 9A :06 
4850 48 42 44 90 А5 79 16 B9 07 D9 D9 D9 FD СА 54 57 :77 
4860 А7 79 11 ВВ O1 9A 15 2А FB Al 79 10 B7 09 81 ОА :В6 
4870 AS 79 10 FB 20 B7 09 81 01 9A 64 OS 15 5A OO BE :C2 
4880 45 SF 9A А5 79 12 8B 41 ВЕ АҒ 38 38 57 89 OE 15 :5F 
4890 DD DD 1E B7 O6 81 15 54 BS O1 1E BE OD 15 DF DF :26 
4880 1E 89 07 54 BS OO 1E 56 56 1E SA 17 15 BB 17 56 :55 
48BO S6 15 5А 10 8B OA 15 B7 6B 83 OB DD DD 1E 81 O6 :56 
48CO 15 BB ОЗ DF DF 1E 9A 9A 24 BE 46 FB 89 O1 9A AE :7D 
48DO 48 СВ AS 79 11 B? 07 89 67 BS O4 FD АЕ ҒО OC FD :47 
48EO BA B7 FD 89 OB E9 79 15 OO BS 34 AE 48 CB БЕ 16 :56 
48FO BS 80 FD АЕ ҒО ОС FD BA B7 FD 89 OF BS 36 AE 48 :98 
4900 СВ BS O1 AE 79 15 BS O1 AE 79 17 BS 40 BE E4 1А :^1 
4910 38 58 38 B7 10 89 O8 BS O1 AE 79 12 ВА 48 88 А5 :F7 
4920 48 СВ 58 79 SA 10 B7 34 89 07 15 BB ОЗ DF DF 1E :1E 
4930 9A B7 36 89 OB 15 B7 ев 83 Oš DD DD 1E 9A 9A 9A :B4 
4940 6A ОҒ 58 77 SA 50 48 79 4A 11 FD АВ FD 98 55 BB :05 
4950 36 55 А7 79 10 89 50 15 28 OS FB AO B7 ОВ 8B 14 :26 
4960 81 02 BE 25 А5 48 СВ B7 38 B9 09 OS B7 28 83 15 :F4 
4970 DD OE 8E 11 OS FB АО 8B OC А5 48 СВ B7 32 89 05 :5E 
4980 05 8B O2 DF OE 6A ОО FD 1А FD 2А 54 54 54 54 88 :94 
4990 47 9A OO OO OO OO OO O1 64 OS 58 79 SA 40 FD АВ :89 
49680 FD 98 55 BB 70 55 AE 49 97 55 B7 05 BB 67 54 57 :91 
49BO А7 79 11 89 50 AS 49 97 89 2Е А7 79 15 89 15 57 TBS 
49C0 FB А1 79 10 B7 O2 89 O4 BS 02 BE 46 B7 OO 89 45 :48 
49DO В5 O1 8E SE 57 FB А1 79 10 89 04 BS O1 БЕ 33 B7 :92 
49EO FE 89 32 BS OO BE 2B OO А7 79 15 89 13 57 FB A1 159 
49FO 79 10 89 O4 BS O1 ВЕ 1A B7 FE 89 19 BS 02 BE 12 :2F 
4АОО 57 FB А1 79 10 89 O4 BS O1 ВЕ 07 B7 02 89 O6 BS :Е9 
48410 OO 38 1E 6A OO FD 1А FD 2A BS ОВ FD DA 88 81 9A :20 
4420 O1 AE 4A 20 ВА 4A BD OO 6 04 58 79 5A 20 FD АВ :07 
4430 FD 98 55 8B ЗА 54 54 54 6A 05 48 79 4A 40 FD 98 :CE 
4440 FD АВ FD 88 45 8B 2А 45 17 89 26 45 B7 OO BB 21 :81 
4А5О S6 56 45 17 89 1B 54 OS 17 89 16 54 54 54 15 DD :E7 
4460 1E B7 20 81 O4 БА OO ВЕ ОВ FD OA FD 2A FD 1A BE :АВ 
4൧70 EF FD OA FD 2А FD 14 BS ОВ FD CA 88 ЗЕ 54 54 59 :C8 
4480 ОО 38 38 38 38 38 38 38 56 56 56 SD 07 89 AY 6 :CE 
4490 OF 48 77 4A 50 FD АВ FD 88 FD 98 45 56 8B 61 45 :02 
4660 17 89 SD 54 OS FB 11 BB OD B7 FB 89 55 54 54 15 :11 
4ABO 38 38 8B 4A ВЕ 05 54 54 15 89 43 9E 9C 56 56 56 :1D 
4ACO 56 15 B7 O2 83 14 FD 98 54 А5 79 10 17 ӨЗ 04 BS :14 
4ADO OO BE 02 BS 01 54 54 1E FD 14 55 8B 19 54 А5 79 :90 
4АЕО 11 FB А1 79 13 17 83 04 BS O1 ВЕ 02 BS OO 54 54 :8F 
4AFO 1E А7 4A 20 89 ОВ FD 1А FD OA FD 2A BE ЗА 64 OO :08 
4BOO FD 1А FD OA FD 2А 44 44 44 44 ВВ 77 38 38 38 58 :45 
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PIO 


Up & Down 


41210 
41820 
4B30 
4B40 
4BSO 
4B60 
4B70 
4880 
4890 
4180൧0 
4BBO 
4BCO 
4BDO 
4BEO 
4BFO 
4000 
40.10 
40.20 
40.50 
4040 
4050 
40൧0 
4C70 
4080 
4090 
4CAO 
4CBO 
ассо 
4CDO 
4СЕО 
4СЕО 
4DOO 
4D1O 
4D20 
4D30 
4D4O 
4D5O 
4൧൭൭ 
4070 
4080 
4090 
4DAO 
4DBO 
4DCO 
4DDO 
4DEO 
4DFO 
4ЕОО 
4Е10 
4Е20 
4ЕЗО 
4E40 
4ESO 
4Е6О 
4Е70 
4ЕВО 
4Е90 
4ЕАО 
4ЕВО 
4ECO 
4EDO 
4ЕЕО 
4500 
4600 
4010 
4020 
4F さ O 
4F4O 
4050 
4F60 
4F70 
4F80 
4Ғ9О 
4FAO 
4FBO 
4FCO 
4FDO 
4FEO 
4FFO 
S000 
S010 
5020. 
5030 
5040 
5050 
5060 
5070 
5080 
5090 
SOAO 
SOBO 
50CO 
50ро 
5ОЕО 
SOFO 


54 


マシ ン 語 リス ト 


ВЕ ЗА 15 89 07 54 54 BS 01 1E 8E 50 
2В 58 58 58 54 54 57 ടം 88 ОЕ 15 89 


54 1E 8E O8 DD 1E BE 04 38 38 58 38 


PRA, 初め まし て . 雑誌 に 初め て 投稿 する D.N._AIO で す . この ペン ネー ム は , 住所 氏名 年 齢 職業 の それ ぞ れ の 頭 文 字 で す . P.S. (Z lU, 
今度 ある 機種 か ら ( お な お せ ー な い )PC-8801mkII (モデ ル -10 か 20) に 替え る つも り で す . も し 替え た ら 、 ヴォ ル ガ ー ド や る ぞ 一 , サラ ダ の 国 の ト 
マト 姫 や る ぞ 一 , PiOPiO や る ぞ 一 , と ゲー ム め あて で す が , BASIC や マシ ン 語 も 勉強 する の で , な に と ぞ 今 後 も よろ し く お ね が いし ます . P. 
|“) 5.2 Nakkey き ん , ファ ン で す . と くに 11 月 号 p.87 の 絵 い いで すね . Р5.3 同時 に も うぅ 一 枚 ハ ガキ だ し た けど 載る か な ? PS.4 PiO の 読者 


PIO 


Up & Down マシ ン 語 リス ト 


SAAO OO 20 20 48 69 2D 55 63 6F 72 65 20 3D 20 OO 54 :Е7 
SABO 68 69 73 20 69 75 20 48 കഴ 2D 55 63 &F 72 65 20 :7C 
SACO 21 21 20 20 20 20 20 20 6A 02 FD АВ 6A FF 48 O2 :7C 
SADO 44 OO BE E6 F 68 OO БА 07 ВЕ ЕВ 8C FD 2А 88 16 :3B 
SAEO B5 10 АЕ 78 75 68 5A 6A 83 BS ОҒ BE ED OO BE 59 :BB 
SAFO АО ВЕ ലം 69 F2 E? 78 75 ОО BS OD 68 SA БА 93 BE :85 
SBOO ED OO BS 4E 48 79 4A СВ BE 59 F8 BE 59 АО ВЕ Еб :9А 
ZB10 69 5А 07 48 79 4A СВ 58 7A 5A ОО FS 88 03 6A 07 :45 
SB20 48 79 44 АВ 58 7А SA 10 FS 88 03 BS 02 ВЕ DO D2 :FO 
SEZO 8B 30 ФА 07 48 79 4A СВ 58 79 5A АВ FS 88 ОЗ F2 :DB 
5B40 E9 78 75 ОО BS 13 68 SA 6A АҒ BE ED OO BE 59 АО :59 
SBSO 6Q 02 FD АВ ВЕ Её 69 68 OO óA 05 BE E8 8C FD 2A :4B 
SB60 88 10 F2 E? 78 75 ОО BS OD 68 5A бА А1 BE ED OO :ñš 
5В7О BS 4E 48 79 44 АВ ВЕ 59 F8 BE 59 AO ВЕ Её 69 FD :DE 
SB8O E9 FO OB FD ВА SC 78 9 48 OO 4А OO А5 4D C7 B7 :7C 
SB9O 01 89 ОА AS 4B АҒ 2A BS OA FD СА 88 04 AS 4р 17 :02 
SBAO ВВ ОА DF 2A BS ОА FD СА D? 88 OS 38 FD 88 BE SA :E6 


SBBO 70 FD ОА FD &А 58 79 SA CO ВЕ 58 OO 48 79 4 CO :р2 
SBCO B5 77 ВЕ 59 F8 ВЕ 59 AO 58 7A SA OO 48 79 4A CO 33D 


SBDO 6A 07 FS 88 ОЗ 58 7A SA 10 48 79 44 C8 6A 07 FS :8D 
SBEO 88 ОЗ BE EF BA 58 79 SA C8 48 7A 4A OO 6A 07 FS :Ар 
SBFO 88 ОЗ BA SC DO 9A 9A 9A 48 69 2D 55 70 65 65 64 :19 
SCOO 20 41 69 С 65 61 6E 20 21 21 50 45 2D 51 55 30 38D 
5С10 50 20 2E 2E 2E 2E 20 67 89 76:65 20 75 70 20 2E 173 
SC20 2bE 2E OO OO OO OO OO OO БА O4 FD АВ ВЕ E6 69 68 :B3 
SC3O OO БА 06 BE ЕВ 8C FD 2A 88 10 AS 4B АҒ BZ 08 89 :CE 
SC4O 12 F2 68 SB 6A F8 4A 12 ВЕ ED ЗВ BE 55 AO BE 4D :FB 
SCSO АВ BE 18 B7 10 89 14 F2 68 SC 6A OA 4A 18 BE ED 177 
5С6О ЗВ BE 59 AO BE 59 АО F2 ВА SA СВ ВА SC 98 OO OO :08 
5C7O 55 74 61 67 65 20 3D 20 BE SA 50 ВЕ 5р 38 BS 03 :05 
SCBO AE 4B АЕ 68 OO A ОО 58 79 5А СВ BE 58 OO BS 00:18 
SC90 AE 4B AF 38 38 38 38 38 BE 4B BO А5 79 ҒО 8B ОЗ :46 
SCAO BE 58 FO BE 4C 38 ВЕ 59 SF F2 4A ОВ 68 SC 6A 70 504 
SCBO BE ED 3B 68 OO AS АВ AF DD 2А 58 7А SA ОО BE 58 :6E 
SCCO OO 85 50 48 7А 4А OO ВЕ 59 F8 BE 59 АО 38 38 38 :20 
SCDO BE 4E 88 BE 4E FO А5 4B AE 89 ОЗ BA SA C8 AS 4D :8C 
SCEO EF B7 O1 89 ОА А5 4B АҒ DD АЕ 4B АҒ BA SC 28 А5 :65 
SCFO 4C 77 B7 O1 89 ОЗ ВА SC 98 А5 4C C7 B7 O1 89 ОЗ :BB 
5DOO BA SC 98 А5 4D 17 BB ОЗ BA SB 88 AS 4D C7 B7 O1 :D9 
5D1O 89 ОЗ ВА SB 88 9A 9A 94 20 52 41 4E 44 4F 4D 20 :24 
SD20 4D 4F 44 45 00 52 45 47 55 4C 41 52 20 4р АҒ 44 331 
SD30 45 OO OO OO OO OO OO OO F2 E? 79 FO O1 58 SD 6A :АС 
5040 25 4A OC AS 79 FO BB O2 6A 18 BE ED 3B BE E2 43 :28 
5D5O B7. OD 89 O1 9A B7 OE 89 O1 9A B7 IF 99 11 А5 79 1:54 
SD60 FO BD O1 AE 79 FO 9E 30 OO OO OO OO OO OO OO OO :9B 
5D70 55 70 20 26 20 44 6F 77 6E 20 20 56 65 72 2E 31 TFA 
5080 2E 32 20 20 41 6C «С 20 4D 2E 4C 2E 20 26 20 55 :DF 
5090 éF 75 6E 64 20 20 38 54 2Ғ 31 30 2Ғ 31 50 20 
SDAO 26 54 50 46 30 2D 26 55 44 41 46 20 20 20 20 


“京都 市 CHIAKI 


NEW YEAR 


cm 1485 
е from мови 


П 


? 
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今後 の 企画 の た め に , 次 の よう な プ ブログ 
ラム & る 原稿 を 募集 し ます . どしどし ご 応募 


иш Кез 151 東京 都 渋谷 区 代々 木 1-37-1 


А っ て 演技 を する プログ ラム, ゲー ム の デモ ぜん らく ビル 5F 工学 社内 
ツー ル 部 分 ど だけ の プ ブログ ラム ,。 デモ ・ ブ ログ ラム PiO 編 集 部 
パタ ー ン ・ エディ ക, サウ ンド ・ エ ディ を 作る だ め の プ ログラム を 募集 し ます . OOO ( 例 : ゲー ム 作成 ジー ル 係 ) 
AR, ミュ ー ジ ッ ク ・ エ ディ タ , ゲー ム 作 制 ここ で 注意 で す が , ディ スク を 使っ て 画 ※ プ ログ ラム は カセ ッ ト か ディ スク に 入れ 


Hxc Кес. ゲー ム を 作る と き に 便利 な ソ 画 い つっ ぱい に アニ メー ショ ン し て も 面白 い C, それ ぞ れ プロ グラ ム の 操作 方 法 な どの 
フト を 募集 し ます . уз, パタ ー ン ・ エ デ 90795 これ で は デー タ だ け て 膨大 な 量 説明 を 原稿 用 紙 に 書い て くだ さい -. 

ィ タ や サウ ンド ・ エ ディ タ を 送ら れる 方 は , に な り , 入力 する 人 も 大 変 だ し , 紙面 も 多 

サン プル ・ デ ー タ も で きる だ け 用 意 し て く く 取 られ て し まい ます . あま り 大 きく な い ` ※“PiO な リス ト 入 力 方 法 "、 “パソコン 時 計 " 
だ きい > キャ ラク タタ を , ある スト ー リ に 沿っ て 動か の 発表 は , 誌面 の 都合 上 を それぞれ 84 年 1 月 
Iv : St Pu. =, 2 月 号 か ら '85 年 2 月 号 , 3 月 号 に 変更 


) шшен പ റ Еа. STC i= 
- БЫ Sos 4 ーー о ログ ラム 
FERT RETA D САРО “жу 


チ 機能 付き , 形 は PiO の 鳥 さ ん 風 で , 3 時 レ し の 絵 や PiO の キャ ラク タ を デ 
に な る と 鳥 き さん が 動い て ピ ポ ボボ ポッ と 鳴く 時 一 タ を 利用 し て 描く ブログ ラム , 簡単 な 計 
計 …. これ は 1 つの 例 で す が , 皆さん も オ 算 て 描い だ 絵 , グ ラフ ィ ッ ク ・ エ ディ タタ な 
リ ジ ナ ル の パッ ュ ン 時 計 を 作っ て み ま せ ん と ど と に が かく 画 面 い っ ぱい に 繧 を 描く プ ブログ 
か . 工夫 次 第 で 面白 いじ も の が で きる と 思い ラム を 募集 し ます . 

ます . 〆 切 り : 12 月 20 日 発表 PiO 85 年 

3 月 号 


の 中 に アウ シタ ン は いな いか な ? | E (D.N.A.O) 
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あな た は スリ ル を 求め て 世界 中 を さす ら 
RATH. ある と き あ な た は ADEA 
と 出会い , ふ ぶ ふと こん な 話し を 耳 に し まし た . 

この 山 を いく つも 越え る と 魔王 の 住む 国 
が あっ て な . な ん で も その 国 に 隠さ れ た 5 
本 の 聖 剣 を ひと つ に 集め れ ば , この 世 を 支 
配 で きる ん だ そう じゃ 」. 

そし て , あな た は その 国 に な ん と か た ど 
り 着 きま し た が , 途中 で 武器 や お 金 は 使い 
果たし て し まっ た の て 丸腰 で す . で も 後 戻 
り は で きま せん . さあ , 何と し て も 5 本 の 
聖 語 を 捜し 出し て く ださい. 

Es нж. ққ, 5,4,4, 


オー ル ・ マ シン 語 (&BA00—&C676) で 


7. 入力 に は ポケ コン ・ マ シン 語 入 門 (工学 


А) に 掲載 され だ た モニ タ や マシ ン 語 エディ 
タタ (文献 2 ) な ど を 使っ て くだ きい . 


CALL& BCBD NN ud Ie 


し て 表示 が 入力 モー ド (15 桁 目 に “?”, 
17 桁 目 に 4" が 表示 きれ る ) 以外 の と き 
は , [CL] キー を 押せ ば 次 に 進み ます . ま た , 
入力 モー ド の と き は コマ ンド ( 表 1) + 
y F LT [ENTER キー を 押し て くだ さい . 

な お , MOVE で は 進み た い 方 向 を 聞い て 
くる の で て EAST, WEST, SOUTH, NORTH 
の いずれ か で 答え て くだ きい. また ТАКЕ, 
BUY な ど は 何 を 取る の か 何 を 買う の か を 
SWORD, GUN, MONEY な ど で 答 ぇ えて < 
q S v: 

それ か ら , GIVE UP で ゲー ム を 途中 で 
止め た 場合 で も , CALL& BCDB と すれ ば 
続き か ら 6 遊べ ます . あと , GIVE UP 以外 
の ユマ ンド や 進み だ たい 方 向 を 入力 する と き 


2800 929793B8F1E992FFi 9F 
BAGS 93F7F1EE929B3424: 3E 
2810 39DBF1CT3ADBT3BA:AB 


2818 488305FFB6F1D22F:EF 
8828 1192705096 1602: 6B 
2828 8B342488DBF1CT7S88:F6 


Дл. же ЕЕ ЪЪ, ти СЉЪ ЕЭ кэк 85271൦32. 
載っ た セル 画 、 FC,No 1 希望 と 書い た 添え 書き は 2 人 で 考え だ た も の だ っ た ん で す (発案 は 私 で し た ). 当時 , こん な 風 に 後 か ら 言 われ る な ん て 
思い も せ ず に や っ て し まっ だ こと な の で , いま まで 黙っ て て ご めん な さい 。 
し 載る よう な こと が あっ た だら 見 て くだ さい ね . 


MOVE 
LOOK 
SPEAK 
FIGHT 


TAKE 

BUY 
ENTER 
OUT 

RUN AWAY 
GIVE UP ` 


表 2 アド レス ・ マ ッ プ 


セリ フ を LCD へ 表示 

カナ 文字 キャ ラク タ ・ デ ー タ 
セリ フ の 書き 込み 

コマ ンド 判定 
マッ プ ・ デ ー タ 

初期 設定 

メイ ン ・ プ ログ ラム 

各 コ マン ド の 処理 

s me 

死ん だ と き の 曲 の デー タ 
セリ フ ・ デ ー タ 
ミュ ー ジ ッ ク 

剣 を 5 本 集め た と き の 曲 の デー タ 
5 本 の 剣 を 集め た と き の 処 理 
死ん だ と き の 処 理 


പ്ര か 


hy 人 応 載 せ て 
$725, マジ に 解析 し な い 方 が 身 の た 


めで で しょう. な に し ろ 初 め て マシ ン 語 の プ 
ログ ラム を 組ん だ も ん で , バグ 取り の た だ ため 


に 実際 は だ いぶ 入り 組ん で お り , か な り 無 


駄 な こと も し て いる と 思い ます 。 

まだ た だ, この プロ グラ ム で は КОМ 内 ルー 
チン を いく つか 使っ て いる の で , Nb 
3 に 載せ て お きま す . 


BAZO DB78B64003052427:60 
28259 (229846 1222061427: 2D 
2848 6798294791 8075: DE 


それ か 
P.S.1 お 騒 わ が せ し て すみ ませ ん で し た .。 


| PUSH X 

POP X 

LCDOON, A に 文字 入力 

A の 内 容 を C ポ ー ト に 出力 

(X+ 1)5(Y- 1 ) で BB に 示さ れる バ 

イト 数 , ブロ ッ ク 転 送 

A に 中 間 コ ー ド を 入れ て お く 〈 く と, XE 
| (文字 デー タ ) 一 1 の アド レス を 代入 


言い 忘れ ま し た が , カ セッ ト へ は CSAVEM 

“АОҒ5” ; &BAOO, &C676 で モー ブ し て 
くだ きい. 私 の 1251 は バー ジョ ン が &00 の 
古い タイ プ で す が , 他 の バー ジョ ン で も 動 
(Em i1. 

今 ま で に も 1251 を 使っ た アド ベン チャ ー 
は あり まし た だ た が 。 カナ 表示 で オー ル ・ マ シ 
ン 語 / と いう の は あま りな か っ だ と 思い ま 
+. 少々 難し く 作 っ て あり ます が 。 ぜひ 頑 
張っ て 5 本 の 剣 を 集め て くだ きい ぃ い . 

bo, そう そう 。 サザ ー プ < エリ アプ RT 
ー ク ・ エ リア に 使っ て いる の で 6 廊 字 以内 
し か 使え ませ ん . あし か ら ず 。 
ഇക്ക്‌ 
1) “PC-1251/55 純 正 ニ モニ ッ ク "。 

РіО, "84 年 9 月 号 
2) TST AR, 
THE BASIC, "84 年 5 月 号 


БЫШ vL അ Z b NIE DUI QUUD UOTE UE 


ВА48 86050й015028808й2:54 
BASO Й5ҒА9ЕЙ25ҒЙ5ВАҒІ:АС 
ВА58 Е915088208841457:61 


BAGO й084848281Ейй04450:66 
BAGS 148C8802010780418:E4 


BATO 99423 1943497843: E4 


ぢ っ 実は , 彼女 と 私 は 友達 な ん で す .。 こ の 話題 の も と に な っ た FR に 


5, いま PiO に 2 人 で で 合作 イラ スト を 描い て いま す の で , も 


Р.5.2 ほっ て ん と っ と に お ぢ お 葉書 きた くさん 送っ 


Pio 
ERIM マシ ン 語 リス ト 
C418 5751620556515962:71 
C418 6984525551 628564: 39 
C420 59575562875D5F5E:88 
C428 6364556285635164:9B 
C430 515Е056759645358:83 
C438 18CA11C5C6D3BEBD:C4 
C448 DEC61 1 BBAFC3B2AF:43 
C448 С@ййСА611В5ВАП7ВЕ:87 
C450 C311BCCFAFC99CB1:8B 
C458 05090211 04330225: 93 
C460 B3C61106BEB2BAB3:6D 
C468 ВССФФТВСАҒСАОҒВ2:49 
0478 BCC99EB1C5C9CA11: 9B 
C478 BADBBBDACSBCCFAF:27 
C488 C885B1C5C8C91182:D7 
C488 B6C182CFB905B1C5:7C 
C498 COCA1107A611C3C6:E2 


C498 B2DACB861163675F:8C 
С48й 62548357655E055D: 35 


C488 5Ғ5Е556910С5С686:ВС 
(489 1111111111111111:88 
C4B8 111111131185C4C2: E2 
418 BEDEDD88B6DE11B1:D7 
С4С8 DTDCDACOB7A611D3:DE 
C4Da AFC3B2D918C6B9DE:T2 
C4D8 29864091 122087: 98 
С4ЕЙ С5В214В1С5СйСА11:9С 
C4ES 0909690000 1.5: 25 
4068 08161 1802208261: : 6 
C4F8 8657T5F5054555E84:23 
C588 56592625585675164:87 
C588 556295695F675562: 99 
C518 845DS5F5F5b185154: 3A 
C518 66555Е6465625511:88 
(528 5Ғ56115659665511:41 
C528 63675F6254631845:9F 
C538 C2C911BEB2B9DDB6:58 
C938 DE11BFDBAFC94A11:53 
C548 B5D2C3DEC4B3140F:C2 
C948 2392589211 18358090: 58 
C559 ПЕВй4й4848484817:17 
C558 BABAB6D711D8C5D8:77 
C568 C61142CFB2D911C6: 46 
C568 BCC61141CFB2D98D: 3B 
C570 B2RFCOC4BADBC611:51 
C978 B3D2C3B1D996CA11:B3 
C588 BCDDCODE13B6DE11:EF 
(588 CSB9DACADE11CS5C6:9C 
C598 D311BS5BCB4C5B2D6:56 
C598 16DCC0BCCA116367:13 
С5Ай 5Ғ6254С911В108В6:2Е 
CSAS A611BCAFC3B2D986: 76 
C5B0 A611C4D7DACO18B1:B5 
C5B8 (50901 1BABAC663:FD 
CICA 675F6254B6DEB1D9: 9A 
(508 С411ВСАҒС5В20910:9Е 
(529 B1C5C8CA11585F5C:24 
C508 55C611BSAFBACICO:CB 
С5ЕЙ 7DBD385958DA18B8:C7 
CSE8 1857C32895675538: 53 
CSFB 1903280567673812:21 
CSF8 С528056765580ВС5:Сй 
688 2885675E380479BD:64 
C688 8579В058022078ВВ:57 
C618 82025178ВВ92022Е:АА 
C618 7T8BB9278BC3FT79BD:6E 
C620 000Ей024805С6Ғ1Е9:ҒВ 
C628 240824125Ғ600061:54 
C630 11DF574329826001:16. 
C638 DF57432992 じ 32919: Hg 
C649 929943299241291FiF9 
C648 37FFgBFFgRFF99FFi51 
C659 ЙЗВҒҒОТЕҒЙӨРЕЕЙ5ЕР: 16 
C658 B4FF03FF02FF01FF:D6 
C668 891൦910001 79029: SF 
C668 79С2СС0007020Ғй05:22 
[678 С578С62679С2р100:33 


7985225468 77496: 15 
BLES 67152805750778ВВ:56 
ВСЕЙ 92929478BB9278BCi91 
BCF3 3658656942 760066: DE 
BIÐA 89282 792892 798950: 40 
8299 7922882092 788802: 80 
8219 7൦20289285: 788802: 99 
8219 7?FBDB0020578BB82:ñ8 
8228 799699 7920122227 :27 
8228 #20678ВВ8278ВА5Р:4Е 
8228 7T8BC2878BFBDD2T7F:A1 
8239 В0??.ЙВ818576763:35 
8248 3819675E38196755:23 
2249 581Ғ676729251121:85 
BD58 5767883818435279:1F 
BD58 BCDB11282D8D1120:33 
BD68 57678758й08422011:88 
BD68 112157678E2D0B02: 38 
8278 ЙТ778ВЕ2279С156ЕЙ:СҒ 
BD78 8282618078401882:97 
BD88 63507905E80593402:60 
BD88 8878BB825B587409:ED 
2298 3478BB92929978BBI37 
9298 9278BC3FS5B18B880:28 
BDA T75Bñ7TEBD68437EBD:ñO 
BIAS 4E437EBDSAT9BDSE: BA 
BIBO 821578BB82T78BFBD:Cà 
2239 5А2АЙСЙ21878ВВ92:6Р 
BICO 7T8BCSF79BD080D264:DF 
BDC3 9775962943 70882: AA 
BIDDA 43TEC16143TEBF45:A8 
BIDS 43TEBEBS43T7EBDBB:6D 
BDEB T8BFBD58648TTEBD:F2 
BDES ВВ452864025178ВВ:ҒЙй 
3208 92821678BB9278BC: R3 
BDF8 3F820278BB82T78BR:2R 
BEQA 5Ғ788С28020278ВВ:Ғ2 
BE98 EDTFBD28020378BB:89 
BE18 EDTFBDB8828878BB:16 
BE18 Е581102й0578ВЕ22:97 
BE29 2229798392 79296889: 3C 
ВЕ28 7921292532 793392: 23 
BE39 79850 7880289290: 02 
ВЕ58 7323622821 198827: 52 
3E49 й02ҒҒ5278ВЕ4979С6:11 
BE48 aC78BFBD79C20402:42 
BESO 2278859202177888:55 
BES8 92788С5Ғ020278ВЕ:5Ғ 
BE69 7D020678BBEDZA1F:FE 
BE68 022278BB82022578: 78 
ВЕ?Ө ВВ9278805Ғ022978:65 
BE78 BC3C7T9C66B878BB82:57 
BESA 7T8BA5F79BC02810B8: B6 
BE33 2857670429180228:57 
ВЕ9й 7888820228788892:87 
BE98 78ВС5Ғй22078БВ82:57 
BEA й258788892022Ғ78:88 
BEAS ВВЭ2022Е78ВВ9278:ВА 
BEBA ВС5Ғ79С66578ВҒВ0:95 
ВЕВЗ 64187EBDBB821D78:01 
BECO 23892021 7783892739: 92 
ВЕСЗ ВС5Ғй20278ВЕ7002:В84 
BEDA 8278BBEDTFBD28802:88 
BEDS 9673285221 68294: 7C 
ВЕЕЙ 78BBED3SA22828978:FF 
BEES BBED3A398280578BE:58 
ВЕҒЙ 22222992 12798292: 428 
BEF8 8242792892 79850: 70 
BFA 7826497982 991 939: TD 
8683 275775ҒҒ58100251:62 
8010 73BB82024378BB92: BF 
BF18 73BC3F2052024478: BB 
8020 20202283 18282757: 73 
8023 6TFFTCBEEC924978: 46 
BF39 ВС5С024178ВС5010:ВВ 
В827020052112902:6Ғ 
FF52798D88852464:14 


BATS 484828187Сй08й087С:08 
290 4323134443437349: D4 
BA33 5454547C08180858:E8 
ВА9й 4053080808080301:А1 
ВА98 41212998 7199970892: 24 
ВААЙ 01й6й0245221Е4242:1й 
BAAS 7Е42422212087ҒйЙ2:С1 
BABO 423F02423EBABATF:96 
BABS 9990949241 211 94:99 
BACO 83423E0242424242:8D 
BACS ТЕЙ24Ғ221Ғ024А4А: 96 
BADO 42201 (.4222 122046: 62 
2429 9220 4240465064948: A1 
ВАЕЙ 201Ей846443521ЕЙА: 38 
BAES 4АЗЕЙЭЙЗӢЕЙӢ4Е 20:15 
BRF 1E804453D80504087F:2C 
BAF3 9910994424 109484: 
BB 4042424240422812:C4 
BB88 286221 278162288: 17 
21210 4й0201Е00780002й04:ҒС 
2219 783F444444440242:0B 
21220 42221Е04й02040850:С4 
BB28 5292 70222092 1222: 12 
BB38 52й0Ей22828282й058:58 
ВВ58 2422207848281828:76 
BB4 ЙБЙАЗЕ4А4А4АЙ2ТЕ: AD 
BB48 Й20А064042427Е40:94 
21250 484848487ЕЙ4й545:Ғ4 
ВВ58 251C8F48281FBB3C:8B 
ВВЫЙ aaTE4020T7TE402010:CC 
ВВ68 887E424242T7E8682:D2 
BBTA 42221E4242402018: TE 
2879 81020182080878507:19 
BB88 34929793B8F1iE9 
BB88 EE18B80880178211:E8 
ВВЭЙ 1F5B348022203C3F1:89 
BB98 E95B88DB2480230884: 4A 
ВВАЙ 1441298724DAFFB6:38 
ВВАЗ 37824E268078228FF:D5 
BBB9 BiF17T2F1C7T8BABB:FE 
BBB8 FD2380DBF1D2F177:R6 
BECO 8008670й028025767:88 
BECS 0Е280986651Ғ5802:81 
BED 062021670Ғ280986:81 
BEDS 6517580207200058:50 
ВВЕЙ 8367702B0786631F:14 
ВВЕЗ 3302262D8F3402D8:ññ 
BBF9 05С2Ғ1Е958800824:79 
BBF8 4324341441294724: 50 
200 8808й021805В8Ғ1ЕЕ:17 
ECOS F8BBF1EE99998335: 40 
2.10 962493. 7299064929: 14 
8018 180D037D13780238FF:58 
8028 В1Ғ0256702290557:9Р 
BC28 7888982091 783802: 00 
8038 2082278281 788030: £6 
BC38 82593222 7799892798: 09 
248 29997982 10091927: 47 
9048 1627002822278828:DÀ 
8.50 20009922 22993 798: BS 
BC58 829999 1221899995: 43 
BC680 4441124494494345: 19 
ВС68 0303000000220000: 23 
278 27000104042A0007:61 
BC78 9099494081 80998494: 11 
BC3B 0414110йй0й0й04й040й:51 
ВС88 9689099822 1998: 33 
2.90 9091 768202889992: 46 
ВС98 219191 09982 788895: 4F 
ВСАЙ 91910911 510089998: 26 
BLAS 1 7096909290 26 98: 49 
BCB 1222 1008888089909 : 44 
BCB8 1000098081 69028310: E 
BCCO 58807й02001Ғй244й5:29 
BCC8 26196 15887824: 11 
BED9 64 7264 1298682522: B3 
BCD8 78ВЕ22й20578ВВ82:12 


1878282921 79882: 5A 
BF58 92821 7798392792: 84. 
BF58 5ҒйЙ21Ғ7888В820225:5С 
2068 78ВВ92788С5Ғ0202:3С 
BF68 7920729296 798802: DB 
8078 3H1F929578BBED3Ri BA 
8078 888020578BE222D19:8D 
BF89 0226788882022778:ТЕ 
BF88 ВВ9278ВС5Ғ79В000:Ғ6 
898 022878BB82022B78:86 
BF98 ВВ9278ВС5Ғ022078:67 
ВҒАй BB82023978BB9202:3F 
BFA3 2Ғ788В92022Е78ВВ:57 
BFB9 9278BC3F78BE4978:FC 
BFB8 BFD379BD80D118B8:61 
BFC 2157580208112057:04 
BFC8 83447844DA03BCF1:05 
BFDà E9243710B88285742:CD 
BFD8 5237805246418TEBD:61 
ВҒЕЙ BB021E78BB920217:B9 
BFE8 78BB9278BC3F18B8:00 
ВРЕЙ 275767FF28104252: Bà 
BFF8 823178BB82024578:87 
CAB BB9278BC3F78BE49: 3F 
Caa8 T9BD80852464307E:71 
С010 BDBB58741ET8BB92:27 
818 9216792892 79256: 589 
828 02й0278ВЕ70020478:55 
C828 BBEDTFBET5020578:D9 
C838 BBED3SA18828678BB:2D 
C838 EDTFBET3580205T78BE: DC 
C848 2222220226 79881992: 46 
C848 18B828576782288C:E6 
858 8228T8BB9278BC3F:62 
(058 79ВЕ75022778ВВ92:9й8 
868 8BC3FT9BD9978BFiEg 
Ca68 BDSATFC12CD26430:E9 
0870 58555845587Е4558:59 
C9783 8702557888820221:В84 
(888 7888920254788В92:С0 
C088 TS8BCSFa23678BC3C:1B 
(899 18B828576702TFBE:ED 
0098 758221 7982920242 :91 
Cana 788892788С5Ғ0220:67 
САВ 7829929228 78288992: 87 
888 022Ғ788892022Е78:9Е 
СВЗ BB9273BC3F78BFD3:CA 
808 78ВЕ4979С12С10В8:А0 
808 2957427012 792: 63 
Capa 2573249824 7912: 6 
Capa 208222 7929929238: 5C 
СЕЙ 7889929220 782192: BB 
COES 922E78BB9278BC3Fi68 
809 7901282252 78818892: 49 
CAFS 823478BB9278BC3F:6E 
C100 8922678203 198923: 98 
C188 574579ВЕ75022578:ЕЗ 
C118 BB82924278BB9278: BE 
C118 ВС5ҒТ8ВЕ49202Ей2:07 
C129 4778ВС5Сй025778ВС:24 
C128 5С79С66802й0278ВЕ:20 
0150 7TD8202T78BBEDTFBD:DD 
C138 28020578ВВЕП2810:87 
C140 021578BB82021878:5E 
C148 BB9278BC3F2D2202:11 
C158 Й578ВЕ22200878ВҒ:С09 
C158 BD65F8423B8979BD:D6 
[168 888524647807EC1D6:12 
C168 58457ЕС268457ЕС2:С9 
C178 7002197888920217:69 
C178 7T8BB927T8BC3F822F:69 
C180 78BB82023578BB92:B1 
C188 T8BC3F8202T8BETD:28 
C190 828278BBED7TFBD28:88 
C198 820478BBED282102: 72 
2078BB32023078BB:53 


С1А8 92022F78BB92822E:B8 
C1B8 7T8BB9278BC3FT8BE:6E 
C188 4978BFD379BD80882:8B 
‘CICA a678BBEDT7FBE?7582:DR 
С1С8 a8878BBEDTFBETS5082: DC 
(1209 0578ВЕ222048021С:Ғ2 
С108 78BB92021678BB92:82 
С1ЕЙ 7920568282 798672: 2А 
С1Е8 820278BBEDTFBD28:88 
158 820778BBED348882:6D 
С1Е8 8573BE222D1A78BF:DB 
C200 BD64102818821878:FD 
C208 BB82921778BB9278: 93 
C218 BC3F2C0E023078BB: 99 
0218 82021678BB9278BC:93 
C228 3F929278BE 了 D929Ri 82 
C228 78BBED7FBDB99299:17 
C230 了 8BBEU3R98929578:E1 
C238 BE222D1AT78BFBD64: TF 
C248 18390D023278BET7D:3D 
C248 020D78BBED2B1918:83 
C250 B82757422B205202:17 
C258 20788В82025078В8:47 
C260 92022b79BB9278BC: BB 
C268 5Ғ2049021879С108:Е4 
C270 й52464й0858050219:ЕТ 
C278 2C803021078BB9278:88 
C288 С303020278ВЕ7002:84 
C288 8278BBEDTFBD2882:38 
(298 96r8BBED7FBE7592: DA 
C298 478BBED2R2878BFi AH 
С28й BD64883811021978:05 
C288 BB82022578BB9278:R1 
C2B8 BCSFT9BET5821878:3B 
C2B8 BB82922478BB9278: ng 
C2C9 BC3F 了 9BD99929578: BB 
С2С8 BE222D49823ET8BC:CÀ 
C2D8 5С025Ғ78ВС5С79ВС:22 
C2D08 3394475759665511: BB 
C2E0 6560015D815C8163:E4 
С2Е8 0162015601550164:75 
С2Ғй 8152015F8563675F:E1 
C2F8 6254855D5F5E5569:93 
L344 8357655E65805237:8B 
C388 021778ВВ92798С5Ғ:52 
C319 5614201820184519:5Е 
C318 8018521552140000:68 
C320 FFFFFF9916B1B7D7iS2 
C328 D209091311BFB348:54 
C338 4A4ABCDEACBI11CF:6B 
C338 (9914 18428338: BD 
C349 CFBDB61111111111:97 
0548 1111151108В1С5С0:84 
C350 CR11B2CF1195C61 1: 49 
C358 B2CFBDODBFDDCSBA:66 
C360 C4CA11C3DEBTCFBE:84 
C368 DDi18C4DECiD7C611:FE 
C379 B2B7TCFBDB6111111:DE 
C378 131180BBFCi1D7C6CA:16 
C388 11B2B9CFBEDDOFB1:A6 
C388 CSCACA1 1BCDDDBAS: 7A 
C398 11B1D4CFD81185C6:19 
C398. 11В2АҒСй0й4СВВ60Е:95 
288 20930681 10420905: EB 
C388 D81183B7C8110560:D1 
288 5C51595E9567S163:84 
C3B8 6455845359646908:3E 
C3C8 505Ғ655Е6451595Е:ЕВ 
C3C8 й562596655620666:49 
229 5150505569865351:71 
C308 65645С5505ВАВАС6:В7 
C3EB 0611962621 12924: 89 
C3E8 2985396261 18229983: 16 


СЗЕЙ CSC6D311D0B4C5B2: 6A 
C3F8 й550515ЕЙ5675Ғ50:57 


C400 515E8463585F6804:31 
C498 52515Е5Вй06525557:6й 


പല്‍ 2 R : 


N 


大 和 市 DIRECT > 


調布 市 DANCING STAR 


て くだ さっ て あり が と う ご ざ いま し だ . みな る ん に は いつ も いつ も 感謝 の 気持 ち で いっ ぱい で す . 
(みな み ・ し ん た っ くす えら 一 を こよ な く 愛 し て いる ・ り ょ うこ ) 


1SS 


PC-1251 


BASIC 十 (マシ ン 語 ) 


あな た は , 今日 も せっ せ と リ ン ゴ の 収穫 
中 .、 リ ン ゴ が 落ち る まえ に , いく つ 収 穫 で 
きる か な ? 


入力 方 法 


リス ト を よく 見 て , 特に POKE 廊 に 注意 
し な が ら 間 違い の な いよ うに 入力 し て くだ 
ля 


@ жо»; 


最初 は RUN で , 以後 は [pEF|[Z| で ゲー 
ム を 始め て くだ さい 、. 

画面 は ④), ( 図 1) に 分 か れ て いま す 
が 。⑧) が ② の 上 に ある と 考え ん てく ださい. 

キー 操作 は , [2] キー で 上 下 , [4] キー て 左 , 
[6] キー で 右 に な っ て いま す . TUT, リ 
ン ゴ が 熟し た ら そ の 下 に 行っ て [5| キー を 押 
す と 収穫 で きま す . 

し か し , イノ シシ が 自分 に 向かっ て 突進 
し て くる の で うま く か わし て くだ さい .。 4 
ノシ シ に 重なっ た だ たり, 目 の 前 に 行く と は 
ね 飛ば きれ て 死に , 自分 が 3 人 死ね と ゲー 


രയാ THE HARVEST TIME BASIC リ スト ease 


5556»124.126»125.5 4B 
6512851285 :285128:12 


LOIC ZAR : DI" м3(0)ж:, 
Х%(122ж5.25(70ж5,2%( 


熱し た リン ゴ 


図 2 


ム ・ オ オーバー です. 

な お ゲーム は , SCENE1 で は 3 個 リ ン 
ゴブ を 収穫 する と SCENE2 に な り , 以後 は 
4 個 , БІН, 6 個 収穫 する と 次 の 面 に な り 
kd. そし て , 6 個 に な っ だ たら 次 は 3 個 に 
Bb, リン ゴ の 実る 速 さ が 増し , 自分 が 1 
人 増え ます 。 


1ЙЙ:Ә-Р-1: IF PY に ET P= 


zX$(:): GOTO 260 


リン ゴ の 実る 過程 


p 最後 に 


画面 の 左端 に は リン ゴブ が 実り ませ ん . 
だ か ら , リン ゴ は 計 8 個 実り ます . 

また SCENE 1 の 場合 , リン ゴ を 6 個 沙 
と す と 死ん で し まう の で 気 を 付け て くだ すい. 
な お , 最終 は SCENE17 で す . 
避 参 考 文献 


THE BASIC, "84 年 2 月 号 , 
技術 評論 社 


№) =5%(05):5(010.25+р) 


Aix, 208) ECTO 
ടഃ &C585,&FF.&FrF: 
POKES &C557T:&FF&FF 
20:РОКЕ &C583 128,128, 1 
28,:28,128,3,7,3,7,2 
,27»5»7»3,48,112:48 
1112s 325325112948 
25:00 %С6597;112»48»35 
s119 515119 5055011 
95.51 119 35.51 5 1 : 了 55 
й»117»55,35,117»,5й 
30:P0KE &C5B3 117 51551 
87,55,87,5й0,5й0,87,5 
5,87,51,3,5,2,5,5,43 
* 8 52,80,48 
55:РОКЕ &С55й,&80,&8Й›,%& 


82, &81,&80, %80, 12,14 


13,580, 90, 28, 30, 29 
s280: 230 6A: 62:61:88 
a i 

40: POKE &C56F 56:60:62) 
61%56»56%124»126.:26 


8 
25:90КЕ &С54В, &1B | &F8 8 
Йй5,&Й2,&ЙЙ,&0Й0,&2С,%& 
1 に 5&3 了 
50:Z$z" “: POKE %С501%% 
58,%44,%42.%45,%58 
55: "Z'0z9:Nz-1:?24: Y23: 
Mz1:Vz5: RANDOM" 
59:3EEP 1: PAUSE ° 
SCENE "3 STR$ M 
680:WAIT 0: PRINT 99: 
CALL &11Е0: POKE &F8 
03512795127: POKE &F8 
52,127,127,0, 127,127 
: POKE 6ЕР852»127,127 
64:Ғ08 1=0 TO ?:C(I)= 
RND 40+10: NEXT І 
65:00% 158 70 500 
70:0м YAL INKEY$ GOTO 1 
B0 90 110.40, 120 
89:60T0 140 
99:15 ABS (н-1): GOTO i 


B 

185:60T0 149 

110:Р=Р+]: IF P>8 LET P= 
8 

:15:60Т70 144 

120:1Е M THEN 140 

20:1൦ В(8-Р)=6 OR B(8-P 
)=7 LET В$%(10,58-Р) = 
23:3(8-Рҙ)-8: 0070 80 
B 

140:N=N+1:0=0-1: IF N<8 


THEN 200 


150:5- RND 2-1l1:N=0:0=8 
200:IF H THEN 320 
210:1= S THEN 278 
220:CALL &C54B: ІР N=P 
OR N+1=P THEN 688 
238:1F N=0 LET Х%(10,25% 
N)=X$(5):X$(1925+P) 
=X$(11): GOTO 260 
24816 O=P LET 42:25: 
0)=X$(8):X$(19 25+N ) 


250:X$(10525*N)2X$C1):X$ 
(10,25+0)=Х$(4):Х$(1 
@,25+Р)=Х$(11) 

260:6070 428 

270:CALL &C54B: IF N=P 
LET XS(19)25+N)=X$( イ 
):Х8(10»25%00-Х8(2)0: 
6070 310 

289: 7൦ N=0 LET Х%(10,25% 
N)=X$(6):X$(10:25+P) 
=X$(11)』 6070 310 | 


299: IF 0=P OR 0-1=P THEN 


620 

500:Х9%(10› 25+№) =$(5):Х$ 
10» 25+0) =Х$(02):Х$(1 
9 25+P)=X$(11) 

510:6070 420 

320:IF S THEN 580 

339: CHLL %0548: IF N=P 
ШЕТ XS(1925+N)=X$(9 
23:x$(10525*002X$(4): 
GOTO 370 

$340:1F м=0 LET Х8(10,25% 


=X$(12): GOTO 370 
350:ІҒ 050 OR 0-1=Р THEN 
648 
360:X$(10» 25*ND 2XSC1):X$ 
(180»25*0)2X$(4):X$(1 
0,25%Р)-Х8(12) 
7T8:G0T0 428 
88:CALL 80548: IF N=? 
OR N+1=° THEN 660 
398:IF м=0 LET Х%8(10,25% 
N)SXSCÓD:1NSCI8S 25+P) 
-Х8(12): 0070 370 
488:IF 050 LET X$(10:25* 
0) =Х$%(10):Х%(10,25+№ 
)=Xs(3)』 GOTO 370 
410:Х%8(10%25%М05Х8(30:Х% 
(18»25%00-Х%(20:Х%(1 
й,25%Р)-Х%8(12) 
420:Ғ0Р 740 TO 7 
430:IF ВОГ>О? THEN 500 
45 ІР IDV*BCJO«CCJ) LET 
3$(19,59+J)=B$(B(J) ) 
:B(J)=B(J)+1: GOTO 4 


рр, や っ た . みな みり ょ うこ さん か ら 手 紙 を いた だ きま し た . イラ スト が だ た くき ん 書い て あり まし た だ た だ. りょう こる ん あり が と う ご ざ いま し 
7. と ころ で 最近 FM- 7 の BASIC ゲ ー ム が , 初期 の PiO よ り 全 然 載 ら な く な り ま し だ ねぇ . だ か ら BASIC ゲ ー ム を も う 1 回 で いい か ら 載 せ て 
くだ さい . P.S.1 乱文 お 許し 願い ます 乏 き だ な い 字 で すみ ませ ん . PS.2 ヴォ ル ガ ー ド の ナイ アル と レプ ュー ン の や っ つけ 方 だ どれ か お し 
A えて くだ さい / ( 没 ば っ か り の OSAMU) 


78 
45й:5070 500 
78:16 9൮463 THEN 500 
480:T=T+1: Ir T=6-K LET 


500:МЕХТ Ji IF U THEN 78 
ag 

510:МЕХТ 1: GOTO 59 

609: %С54В8:Х%8(10,25% 
М2шХ8(12:Х%(10»26%М8) 
=Х$(11): IF N=? THEN 
700 

610:F0R [=й TO 6-N:X$(10 
s 26+№+_) =Х$00):Х$(10 
s27+N+L)=x$(11): 
NEXT L: GOTO 700 

6529: CALL %С548:Х%(10,25% 
02-Х%8(2):Х%(10,24%0) 
=x$(11): IF O=i THEN 
700 


TS 


スト ー リ ー 


死 行 拳 を 使う ケン る ん . そして, その 恋 


'539iFUS L=B TÜ 0-2:X$(10 


s24+0-L)=X$( 0): X$(18 
s23+0-L)=xX$(11): 
NEXT L: GOTO 700 
CALL %С548:Х%(10,25% 
025Х8(42:Х%(10,24%0) 
= を (12)』 IF 0=1 THEN 
790 


FOR 1=й TO 0-2:X$(10 


.24%0-( 2-Х%(Й20:Х8(10 
:25%0-(2-Х5(12): 
NEXT L: GOTO 798 
CALL &C548:X$(1925+ 
N)ZN$(CS):X$(10» 26*N) 
=X$(12)』 IF N=7 THEN 
?йй 
‘FOR し = TO 6-N:X$(C10 
s 26+N+L)=X$ (0): X$(10 
s 27+N+L)=x$(12): 
NEXT L: GOTO 700 


7Йӣ:Ү=Ү-1:10=0: IF Y=Q 
5070 720 

T:0:BEEP 1: PAUSE ° 

LEFT "5 STR$ (Ү-1) 

: 5070 830 

720:М81Т 200: PRINT " б 
АМЕ OVER!!" 

T21:IF М-1>В LET DsC:Cs 
2 ട1-1 05503: 05503: 
ші: INPUT ” NAME= "5 
F$: СОТО 726 
IF 0-1. LET D=C:C=M 
-1:0$26$:E22: INPUT 
v NAMES 7:08: GOTO 7 
26 M 

24:IF M-15D LET DzM-1:& 
=3: INPUT " NAMES *; 
9% 

SSWAIT 200: ВЕЕР 1 

PRINT " 1: SCENE. ^3 


B 
E. 
, 


DIO 


THE HARVEST TIME BASIC リ スト 


STRS Bs" BY "SFS 
7T28:PRINT ” 2: SCENE 
579% Cs" BY “EGS 
730:ЭКІМТ " 3: SCENE 
STR$ 05° BY 7:09 
740: INPUT ° 3EPLAYCY/N)D" 
34$: IF W$z"Y" THEN 


800:А=й+1: ІС AzK*3 LET 
K=K+ism=m+i: GOTO 82 
2 

318:6070 148 

820:IF K=4 LET <=B:Y=Y+!' 
2УшУ-1: IF V=1 BEEP 
3: WAIT 200: PRINT ° 

GAME CLEAR! i"? 

WAIT 0: PRINT 799: 
CALL &1158: GOTO 850 


くだ さい. 


人 の リン ちゃ ん . し か し , ケン さん の 宿敵 

チン さん に , リン ちゃ ん を 奪わ れ て し まう . 
SD, 君 は 死 行 拳 で チン きん を 倒し , A 
ご と リン ちゃ ん を 救う こと が で きる か / ノ 

ゲー ム の 説明 

⑨ 全 し 方 ・ や られ 方 

キッ ク :й КОХ 613: ( 図 1). 

ッ メンチ : 真 上 の 敵 を 倒せ ます ( 図 2). 

+ a > 2° 真横 の 敵 を 倒せ ます ( 図 3). 

以上 の 技 を 使い . チン きん を 初め と する 弟 

子 だ た ち を 倒し ます . 


画面 上 の 敵 を 全部 や っ つけ れ ば クリ ア し 
iT. 
エネ ルギー 

画面 に 出 て くる フル ー ツ を 取ら な いと エ 
ネル ギー が な く な り ま す 。 そし て エネ ル ギ 
ー が な くく な る と 。 キッ クー バン チー チョ у 
デ の 順に 技 が で き な く な り ま す . 

まだ ,。 バ パワー エネ ルギー と いう の が あっ 
C, それ を 取る と 一 定時 間 触 わる も の すべ で 
て が や られ て し まう と いう ,。 すばらし いこ 

図 1 


838:029:Nz-1:Pz4:80-0 

840:ҒОВ Lz8 TO 8:BCL»5z8: 
NEXT _: 5598: GOTO 5 
10 

859: PHKE %7819»58»36»20» 
12754564555552512519 
,74.42,26»9,2,й0»127, 
8:16:05 70566535 

868:POKE &Е830› 18,14 

878:60T0 878 


| / @ ジ ョ ー・ ア レク サン ダー 
た 3 面 以 降 は 弟子 は ずっ と 5 人 で す . A と に な り ま す .。 チン きん の と き に 利用 し で て 


の ② ク リア 


1 面目 は 弟子 3 人 と ,。 ユミ る ん と いう 号 
使い を 倒し ます . 弟子 は パン チ (真横 の 敵 
を 倒す . ケン さん の 使う チョ ッ プ と 同じ ) 
し か 使え ませ ん が ,。 ユミ さん は パン チ の 他 
に 矢 (真横 に 一 直線 に 画面 の 端 ま で 飛ぶ ) 
を 射 っ て きま す . 

画面 は 段々 畑 の よう に な っ て いる の で , 
矢 が 衆 ん で きだ 6 ら 上 か 下 に 。 മമമ? 
る を か も て 《 だ きい いし か し もし 。 と 本 また は 月 
が あり , 下がり すぎ る と 死ん で し まい ます . 
ij, 一 番 上 に は 本 が あり 上 が りす ぎ て も 
死ん で し まい ます . 

2 番目 は 弟子 4 人 と オノ る ん と いう 針 使 
എല, TUT, 27൧225 ( 
を 描い て 飛ぶ . 最後 は 下 の 川 に 落ち る ) を 
投げ て きま す . 

3 面目 は ,。 いよ いよ チン さる ん の 登場 で す . 
チン さん は 回 転 キ ッ ク を 使い , 一 定時 間 ケ 
ン る ん を 追っ か け て きま す . そこ で 動き が 
止ま っ だ と き に 技 を か け て や っ つけ て 〈 く だ 
る さい ぃ い 、 し か し 。 い まま で の よう に 1 回 だ け で 
ROT Ts IAT ESS “Бат Ж 
1 回 ずつ や ら な いと チン さん は 死に ませ ん . 
ちな み に 弟 子 は 5 ЛТЗ. 

を そし て 3 面目 を クリ ア す る と ,。 ユミ さん 
ーー オノ さん 一 チン さき ん の 順に 回 り ま す . ま 
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PC-1350 


BASIC 二 マシン 語 


S MX /) 
Шеге 


この ゲー ム は , カー レー ス を 作る つも り 
が な ぜ か 途中 か ら プ ロッ ク く ず し に な っ て 
し まっ た と いう , いい 加減 な 成り ゆき か ら 
生ま れ た も の で す (な ん の こっ ちゃ ?). 

ゲー ム の 基礎 が で きた の が PC-1350 を 買 
っ て 3 週間 後 ご ろ …. それ か ら 遊 ぶ ご と に 
・ ア ッ プ し て いき , 一 応 ケ リ が 


バー ジョ ン 


つい た の が な 今回 発表 する Ver 2 Ре: 

それ で は 皆様 で お 楽し みく だ さい . た だ 
L, 慣れ る まで は ボー ル を 打ち 返す の も 困 
ЕСТІ. 


КУ а ALA apa Co 
റാട്ട്‌; 

CU HANE TE UNE GE 
6900 -- ൭60110 か ら で き て いま す . ゲー ム 
の 主要 部 分 は マシ ン 語 で 組ん で ある の て 
速 き は BASIC の 比 で は あり ませ ん , 参考 
まで に 図 , 表 を 添え て お きま す . 

と ころ て 入力 方 法 で す が ,。 まず リス ト 1 
を 入力 し て も ー プ し 。 次 に 各自 工 肉 し て り 
スト 2 を 入力 し ます . た だ だし, READ~D 
ATA 文 で 入力 する と き は BASIC プロ グラ 
ム み で マシ ン 語 を 壊さ き な い よう に 注意 し て く 
だ ONY, 

そし て リス ト 2 を メモ リ に 書き 込ん だ ら 。, 
次 に リス ト 3 を 入力 し て RUN し て くだ さる 


o. 出 て くる 数 字 と 表 3 の 値 を 比べ て 一 致し 


て いい だら, チェ ッ ク サ ム は 大 素 夫 な の で , 
SAVEM "BLOCK" ; &6900; &6C1F 


と し て セー ズ し て おち お いて 《 だ きい 。 
まだ た 。 ここ で ゲーム を し た て な っ た 6 ら り 
REV ERECT TL AD 
53 チェ ッ ク サ ム 


[x] кірі 


ゲー ム は [|pEF|| 三 | で スタ ー ト し ます . 上 
2: 530. 20, 10 点 と な っ て いる プロ ッ ク グ に 。 
ボー ル を ぶつ け て 壊し て くだ さい. ラ ケ ッ 
ト は | [Р] キー て 左右 に 動き ます が , 他 の キ 
ー に 替え だ い 方 の だ め に 方 法 を 示し ます 。. 
図 を 見 て くだ さい . “сыя, [ШО] キー 
に も た だい と き は 。 

POKE&6993, 64 (ENTER (カラ ム ) 

POKE&699A , 2|ЕМТЕЕ| ( 左 キー) 

POKE&69A7, 8 ENTER] ( 右 キ ー) 

と すれ ば OK で す . 

SST AEN PITS TG 
面 数 X100 十 残り の ボー ルズ ベ 10 点 が ボー ナ 
ス と し て 加算 きれ , さら に 5 面 ま で 5 個 を 
限度 ほし て ボー ル が 1 個 ず つ 増 えま す . 


まだ , 1 面 ク リア ご と に 反射 器 が 現われ , 
これ に ボー ル が 当 à る と 一 定 の 法則 に 従っ 
て は ね 返り ます . さと どき 来 た 方 向 に は ね 


返る と き a Eak これ が まだ ラ ケ ッ 
ト の 法則 に 従っ て いま す (ラケット の 端 に 
ボー ル が 当 だ る と 来 た 方 へ は ね 返る ). そ し 
с, いつ まで も ボー ル が 同 ビ コース を 動く 
と き が あっ だ の で , ラケット の 中 心 に 当 た 
бЕЗК»КТЕИЕ ТОН rC a b а 


& tvb- 47: IZ, 
POKE&69D7, 7 (ブロ ッ ク 音 ) 
POKE&6BCO, 55 (MUSIC) 

な お 初期 値 は それ ぞ れ 1 


Et: ТУҒА; 


%2-<%. 


プ ド レス “マッ プ (ӘНІ) を ワー ク お よさ 
び デ ー タ ・ エ リア の m s 
ык aba aka ые š 


_PC- 1350 用 に 作っ た 初め て の ゲー ム が 
この プ ブロッ ク く ず し で す .。 ゲー ム 作 成 に 先 


だ っ て , シス テム の 解析 を し て 投稿 し た の 
で す が 11 月 号 で 先 を 越 き る きれ まし だ . し か し 。 


oo の mm Py 


PC-1350 


——— سے‎ 
мма 090 ЧӘ 


soot lan 


メイ ン ・ ル ー チ ン 
グラ フィ ッ ク ・ サ プ 
| | ラケット ・ サ プ 


42U 728947 
ボー ル 方 向 ベ クト ル 変 更 
ボー ル ・ サ プ , 7n 7258 
| スコ ア 計 算 ル ー チ ン 
-| スコ ア 表示 ルー チン 
-| MUSIC サブ 


т? ワー クタ お よび デー タ ・ エ リア 


1 | 消し た ブロ ッ ク の 数 

| ラケット 位置 
ボー ル X 座 標 
ボー ル Y 座 標 

| ボール X% 軸 方 向 ベ クト ル 

| ボー ル Y 軸 方 向 ベ クト ル 
WAIT 内 容 
スコ ア (10 進 化 ) 

Ó スコ ア 文 字 デ ー タ 

| 音階 デー タ 


あれ に は 載っ て いな いこ と も 調べ で だ の で 追 
っ て 発表 し た いと 思い ます . 

と ころ で 61860 CPU は か な り 不 気味 で , | 
増減 で きる 16 ビ ッ ト レ ジス タ が 2 つ し か な 
oL, 0 ~&IFFF iT &35 ധോ. 
め な いと いう 一 般 的 な 考え を 無視 し た CPU 
СЕС ВНЕ? 

書き 忘れ まし だ が 。 作者 の ハイ 
は 13,710 点 で し た . 


. Аме Met s 


ЕТСЕ の グ ラフ ィ ッ ク ・ ・ サ プ を どんど 
ん 使っ て くだ きい 。. こ の プロ グラ ム で も ,。 2 
バイ ト 短 縮 し て 使っ て いま す . Б, あの 
サブ プル ー チ ン で は DP レジ スタ も 壊れ ます 
(当然 ). 

それ か ら , 電源 電圧 が 低い と ボール が 見 


え を なくなり ます . PiO10 月 号 を 参照 し て 電 


他 を つない で くだ る 


Di 
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リス ト 1 プ ブロック くず し BASIC リ スト 


116: 


:"=" RANDOM + WAIT Q:-CLS : PRINT " | 
xxx BLOCK KUZUSHI xxx" 

20: CURSOR 28: PRINT "HIGH SCORE: "; 
RIGHTS മമ STR$ ഡ്വാംടാ 

30: CURSOR 22: PRINT "Push any Кеч!" 

40:IF INKEY$ ="" THEN 49 

50:С-0:В-5:5-0: POKE &6849,0,0,0,0 

60:С=С+1: CLS : CURSOR 12: PRINT "SCOR 
E": CURSOR 66: PRINT "BALL" 

29: CRLL &6B45: POKE 86931,0» RND 87+4 

80:FOR 1=1 TO B: GCURSOR (114*1X6530): | 
GPRINT " フ gC8E8F829": NEXT I 

9:LINE ‹8,9)-‹4,31),ВЕ: LINE (96,05-« 
100: 31». BF 

190:ҒОВ I-6 TO 90 STEP б: GCURSOR <1,11 
<: GPRINT "DBDBDBDBDB": NEXT I 

119:CRLL &692C:D-C: IF C>5 LET D=5 

111: GOSUB 111+D: GOTO 120 

112: RETURN 

113:LINE 5,14)-〈95,14): RETURN 

114:LINE ‹15,14)-(85,17),ВЕ: RETURN 

115:LINE (55135-(94, 1755 21845, BF: 

RETURN 


LINE <5›13›- 95,12), RND 255Ж256- PEEK &6B4BX100+ PEEK &6B4CX10 
RND 255; BF: RETURN ‘WAIT 100: CURSOR 54: PRINT "SCORE:" 
120:PSET С PEEK &6932+2, 29),Х: IF ; RIGHTS ‹"В000"+ STR$ 5,5) 
INKEY$ -"" THEN 120 ‘IF S>H THEN CURSOR 23: PRINT "You m 
130: GCURSOR (114-BX6» 30): GPRINT "00000 ade high score! !":H-zS 
00090" :FOR І-1 TO 300: NEXT I: GOTO 10 
140:РОКЕ &6333 PEEK &6932+2, 29,509- ‘CLS : PRINT "You cleared this scene 
RND. 2x254, 255 .!: WAIT 100: CURSOR 38 
150: ഒ: CALL 66900: IF A=1 THEN 300 :РОКЕ %бЕВ0» 30, 34 38,34,30, 305 30, 28, 
160: GCURSOR (41, 28): GPRINT "F819291gF8 24,28,30, 28, 24, 24, 254, 24 
99E89939R8H8BR849939R8R8a84999B8 " : POKE &6ECg 34» 30» 28,14»16»20»24,16» 
120:РОКЕ &6ЕВӨ, 2:0»6»4»10»,8»14»12,255: 14,14,24,30,38, 255: CALL &6BCO 
CALL &6BCO ‘PRINT "BONUS "; STR$ C(CX100+BX10): 
180: GCURSOR (41, 28): GPRINT "00000000000 POKE &6B4B, PEEK &6B4B+C ぅ PEEK &6B4 
99999999999299d999999992999999" C+B 
190:В-В-1: IF ദാദ THEN 120 ‘IF В<5 AND C<6 LET B=B+1: CURSOR 53 
200:CLS : PRINT " ZXZXX* GAME OVER シン シシ を : PRINT " BONUS BALL" 
р ‘CURSOR 23: PRINT "Let"; CHR$ 39; "5 
210:POKE &6EB9, 39 34,30, 24, 24 305 345 40, try next scene!" 
34,40, 34, 30» 30,34,40, 48 ‘WAIT 0: GOTO 60 
220:POKE &6EC9 44, 48, 345 305; 30; 34; 405 44; 
26 24 26 24 255: CALL &6BCO 
230:S- PEEK %6В49Ж1Е4- PEEK &6B4AX1E3+ 


EO [2 プ ブロック くず し マシ ン 語 リス ト 


Em リス ト 3 チェ ッ ク サ ム ・ ブ ログ ラム тшш 


18: MRIT 0:1-%6900 

മമ: S=9: FOR 1=1 TO I+&?F:S=S+ PEEK I: 
NEXT I: PRINT S AND 255; 

39: IF I<&6C99 THEN 20 

40:5-0: FOR І-І TO &6C1F:S=S+ PEEK I: 
NEXT I: PRINT S AND 255 


DUET T. 
> ы 
で жо 
Mr lab 2 
D “А 


Oe df уа 
Eg چ‎ 
%- 
に 


ഏം ട്ട. 
നിന 


7 € À 


広島 市 KICKER ` 和歌 山 市 ABESI 町 田 市 Ken 


1S9 


最近 , 各誌 で PC-1251 用 の マシ ン 語 ソフ 
ト が 紙面 を に ぎわ せ て いま す が , 何 も マ シ 
ン 語 が 使え る の は 1251 だ け で は な い の で す . 
そう で す // 同 じ CPU を 持つ 1245 だ っ て 同じ 
よう に 使え る の で す . 少な い RAM 容量, 狭 
い 表 示 面 と 制約 は いろ いろ と あり ます が , 
その 限界 に あえ て 挑み この ゲー ム を 作っ て 
み ま し た 。 


プロ グラ ム は すべ て マシ ン 語 で すか о, 
1 バイト で も 間違え る と 鞭 走 する 危険 が あ 
b £d. な お 入力 前 に , 

POKE&CÓD7, &20 

Кус IMS е な 一 ТВ 
ASIC を 入力 し て も プログ ラム の 破壊 が 防げ 
ます . また 入力 は 直接 POKE する 以外 な い 
と 思わ れ ま す の で , 一 生 懸 命 POKE し て < く 
Hol. 

そし て 入力 が 終わ っ だ た だら ,。 カセ モット イン 
ター フェ イス の ある 方 は , 

CSAVEM "FILEZO1" ; &COOO, &C5 
1Е 

と で も し て テー に セー し て お いて くだ 
mi. 


お も むろ に, Ci を Co КЕСЕ 
с, タイ トル ,。 AAT, 残り の 数 , 面 数 を 
表示 し た 後 , いき な り 5 自分 の 戦闘 機 と 照準 
が 現われ て 快 よ い 音 と 共に ゲー ム が 始ま り 
EY. あと は ひだ すら 右端 か ら 出 て くる 敵 
機 を 撃っ て くだ きい (В). 


1 一 25 面 まで は 20 機 ,。 それ 以降 は 35 機 撃 . 


て ば 1 面 ク リア で 500 点 加 算 き れ ま す . し 


C999 79С500Ғ198020005:СС 
С008 F8F1FS933CFFB692:1D4 
C010 99991319F8681F19:B2 
C918 CTB9993B1F118189:E3 
C820 5502FF18F8681FFF:E4 


表 1 


С000--С098 
C099~COFC 
COFD~C164 
C165—C191 
C192—CIF8 
С200--С254 
С255--С274 
С275--С2А7 
.С2А8--С2С1 
C2C2—C2D7 
C2D8—C2FB 


アド レス ・ マ ッ プ 


自 機 移動 
敵 機 移 動 
RE, WEY 
衝突 処理 
撃墜 処理 
キャ ラク タ 表示 
乱数 発生 
衝突 判定 
AHLI 
音 出し II 

10 進 表示 


Raa DANGEROUS ZONE マシ ン 語 リス ト 


C028 448810С7608186749:С0 
С050 2802С967482802С8:96 


C938 6744280249673728:E4 
С048 02486708281019Ғ8:08 
С048 5006012816050188:80 


C300~ イニ シャ ライ ズ 


DL, 自 機 は エネ ルギー ゲー ジ が 0 に な っ 
220, 敵 機 と 衝突 し た りす る と 1 機 減り ま 
4. そし て 当然 の こと な が ら 。 自 機 が すべ 
て や られ る を と ゲー ム ・ オ ー バ パー に な り ま す 、 


⑩ エ ネル ギー は 3 一 15 面 が 1・2 面 の 1.5 倍 
DEST, 16 面 以降 は 2 倍 の 速 さ で 減っ て 
いき ます 。 

@ デ ゲーム 中 に を 押す と 強制 的 に ゲ 
ー ム が 終了 し ます . た だ し , 文字 表示 中 
は ALL RESET し か 効き ませ ん . 

得点 は 1 機 撃つ ご と に 30 点 加算 され ま 
す . だ だし, 1 面 ク リア し て も 最後 の 1 機 
分 の 得点 が 加算 る きれ ませ ん が バグ で は あり 
ませ ん (ブロ グラ ム の 関係 上 。 先 に クリ ア 
判定 を する 必要 が あっ た た だ た め ). 


700$ 


ക്ക്‌ 
А റ്‌. (240000 - “СІБЕ, 9-7 lk &C200 
—&C2FF, タイ トル お よび ゲー ム ・ エ ンド 
は &C300 一 と な っ て いま す 。 


С050 799319C7631B8811:61 
С058 691888799R11831B: 2B 
C860 2С58886505580Е65:ҒҒ 
С068 1Ғ28088965102405:ТЕ 
C979 8811681B11608816:27 


プロ グラ ム 自 体 は スト レー ト に 作り まし 


С078 896399289919C7B9: A4 
C989 9291993B1F639F28:F ィ 
С088 99993B924919C7BB9: 0D. 
C999 1F929189699978C2: 45 
(898 99926393C7F1F192:13 


C760*61 | PLAYER の 座標 
C762 PLAYER の 残 数 
C763・64 | 弾 の 座標 

C7 6 5 一 7 0 | 敵 機 の 座標 と 状態 
C780・81 | エネ ルギー 
С782 英機 の 残 数 
C783・84 | 照準 の 座標 
C785 エネ ルギー 引数 
С786--88 | SCORE 

C789 面 数 


図 操作 キーetc. 


а) キー 操作 
ne 


[4|… 後 退 


|9 を 移動 
[*|… 前 進 


た が 。 内 部 ROM を ふん だ ん に 呼ん で いる 
の で 解析 し て みた い 方 は 自分 で 頑張 る な り , 


工学 社 の 本 を 買っ て 調べ る な り し て くだ きる 


v. 内 部 ROM を 呼ぶ よこ と に よっ て プログ 
ラム を 短 か く する こと が で きま すし , 表示 が 
暗く な る の を 防ぐ こと も で きま す . 今回 は 
主 に ブロ ッ ク 転 送 , キー 入力 , 定数 代入 . 
レジ スタ 退避 。 文字 表示 な ど に 使用 し て 
まま 

な お アド シレ シス マッ フン (ЖІ) と ワー 
ク ・ エ リア の 説明 (2) を 載せ て お きま 
тос, 解析 の と き に 参考 に し て くだ る い . 


で きる だ け 明 る く な る よう に 作り まし た 
bt, や は り 電 池 が 弱く な っ て くる と 見 え に 
くく な り ま す . 電池 は 早め に 交換 し まし ょ 


- 


pon ОТО 


COAG 0554040404000288:С0 
(888 1888650028254958:01 


COBO 25Ғ11878С2556606:27 
COBS 282966912893C8C8:73 
COCA C98963FF2883C8C8:6F 
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65102805С9С92С15:6Ғ 
482825Ғ11878С255:2Е 
67102В06890878С2:46 
F4DB19C761578945: 2C 
929278C29919C761:76 
378944F 125949599: 43 
0288192F5ñ6ñ18F83D:71 
D681281218C76888: D8 
9970068960000203: BD 
78С2002С2210С765:С2 
88184481165885511:48 
61578945020478С2:С6 
0011855788С75862:14 
DB929378C2991169: 8B 
881878C27532711:C3 
80841803001 19557: 8E 
84152561 11899418: 22 
0211F1E2FF44F1E0: FÀ 
999FFF4441299467: 27 
997CC9933719C389:C9 
2084 1929989888: 42 
1878400C030278C2: 1B 
88С2654029070250:8Ғ 
5478400С2Ғ0410С7:02 
62574552584879С3:0С 
4119388191 96922: 09 
D4FE78C275360479: 38 
C803821878C2C202: DB 


1878С2С210С78257:С4 
4552582711869500:20 
02189702508С9511:95 
8619F11878C25592: 39 
292B96742934F125: 2F 
04045B5279C88379: 6A 
С42Ғ79С45С10С3В0: OF 
999FR91819C78695:B9 
88921 9832278228: SC 
825924 7848802184: 7D 
3799999999999999: 37 
34929993CSF1F183: 63 
SBDAS9D15A5A44DA: 31 
93998414885974B9: AA 
93C7F1FS99958963:R1 
4438296588241389: BA 
5904240158С52904:72 
8506554755412910:Ғ2 
57895908240102С2:7С 
2904850655475541: Е6. 
2910372483065547: B9 
55412908578410С5:55 
5014240810С55257:Е6 
8344533485674238: B6 
0402400811515384: 5A 
1150535837026303: АЕ 
C7F1F103000002C2:70 
0404048A1888598A:19 


4570046509281389:ЕВ 
598845700465092А: 33 
998C63992894DRD9:CE 
5785650429260157:78 
0201540211Ғ1Е25В:78 
34432992F1E95B34: 02 
4329925B4283C729: TE 
1657540211Ғ1Е25В:С2 
34432992F1E95B34: 82 
4329925B43291437:89 
9992954F5978C2E4: 5D 
412B98373478C2ER: 03 
5В58640Ғ74400850:Е4 
DaADBC3379221F1E2: 85 
8892373799999999:F8 
F1E919C3R9999FA9:F3 
1892693478499C2FsR1 
8410C78600820200: 65 
1118924891 16282: 92 
955219C789835599: 8F 
89828 1883522982: C2 
9267938338997991:R3 
6715389379911185:C9 
5585051467255805:В6 
799F 1 1825392FF93: 69 
138211801B78C1DD:57 
10C3C8880FA818Af: 04 
18C762577440DB78: 97 


DO 


DANGEROUS ZONE マシ ン 語 リス ト 


C1F919C3D9999FR9: 93 
1819C78957932B78:75 
C2E478C1F979C499: 9C 
111163585۴641154: 05 
5Ғ675Е1114141111:7Ғ 
115665555C11555D: 48 
6864595554111411:FC 
3754515E5755625F : 7 


65631 16A5F5E5537:8C 


111163535F62551D: 8B 
1111111111111111:88 
11111111115С5556:5С 
641D111111111111:E7 
111111116353555E: AD 
5510111111111111:08 
525257515055115Ғ:2Е 
6655621114143333: BC 
11111111535C5551:99 
6211141411111111:DF 
826505С7Ғ1Ғ10205:18 
34F11878C2556769: 93 
2В06745054Ғ1255В:78 
040404522Ғ1419Ғ8: 89 
3DD4FE028F030882:ñD 
19C7691B79C99319: 9E 
C3E9999FR9187849: 22 
0С058078С2880200:Ғ3 
78С2С278С1Ғ078С1:5Е 


DD020234034078C2: 92 
R82F94FF44679929: AE 
12790998 19218989: BE 
8689187848808248: CI 
348251 1026820034: 
2F81F1E882FF342F:65 
012Ғ1178С1Ғ010С7:41 
86888288 19898285: B8 
8C1186881979C322:82 
F125F1C778C088F1:F7 
D2F118804F020810: 3C 
C7B81F37298032D52: 78, 
6509595В65085857:0С 
63803916638E2392D: 96 
6362289237639F28:C9 
28807191 63855889: CA 
7805996311 298222:24. 
3978C57980048541: 39 
29058С02ӨҒІВ2086:57 
638C3912201678C5: ЗА 
5В821504080810С4:8С 
Ғ4821878С1002087:7В 
78CS99DB78499C37: 13 
8898899898 1 9820: 62 
3E98983E3E981C3E: 2C 
2220223E88141414:E8 
0857805978С52228:А7 


BLUE VENUS p.124 
リス ト 抜 けが あり まし た . 追加 リス ト を 
載せ ます の で , 追加 修正 し て くだ さき さい. 


BLUE VENUS 追加 リス ト 


@@ ЕЕ АА 
ЕЕ AA മമ 
AA QC മം 
Q7 FF FF 
FF FF 1F 
FF FF FF 
FF FF FF 
FF FF FF 
FF FF FF 


7D 4F C1 


%7 48 49 
FF FF FF 
EA BF BF 
ЕВ EB ЕВ 
FF FF AF 
АА AF AF 
FA`ØA FA 
@@ FF FF 
4E 2B 2B 

3 3C SF 
Eé DF FE 
09 4E 22 


FF C5 44 


LX HEP 
11 QQ DC 
27 12 ЕВ 
E7 48 49 
EE ORE B 
00 FF FF 
VESTE BE 
FF 55 00 
55 00 FF 


Te ДЕТЕ 
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Q 
РС-1245/50/51/55 


BASIC 


A LAND MINE 


ア ・ ラ ンド ・ マ イン 0 


あな た は 地雷 地帯 に 入り こん で し まい ま 
し た . 隠れ て いる 地雷 (1 つ ) を ジャ ンプ 
し Ж, 安全 地帯 ま で 逃げ ば てく ださい. 4 タイ トル 表示 , 初期 設定 


画面 表示 , 失敗 判断 Doe | あな た の 位置 
成功 判断 B | キー 入力 


キー 判断 


8:24 od 前 の あな た を 消す 
Quiet | キー 入力 判断 
SS 0 30 行 へ F | 安全 地帯 の 位置 
БЕРГА て スタ ー ト C+. 左 の 棒 が 安 00 スコ ア ・ プ ラス , 音 鳴ら し 3 回 2- | | ループ 
地帯 で , 右 の 人 間 が あな た で す . | 爆発 表示 2. ルー プ ・ カ ウン タ 


を し て , どこ か 1 個所 に 地雷 が 埋まっ て 420 | スコ アァ 表示 
いる の で , 踏ま な いよ うに 安全 地帯 まで 行 


M US Pas. 
な お , キー 操作 は [O| で 一 歩 前 進 , |「。| で 
iyun E. 


7 (#1) (382) を 載せ て お き あな だ た の カン だ けが だ た より の ゲー ム で す . 


: ブロ グラ / NI jest ます の で , どう を 残り で 自由 に 改造 し て く 本 当 は この ゲー ム , キャ ラク タ な ど に こっ 
enl af t АМ, の だ さい ふい 、、 て リス ト が 4 倍 も 長かっ だ た の で す が , Ж 
и E Mc es 


まこと の て おま も た だ: 


リス ト は だ っ だ の 12 行 で 299 バ イト Z P 
ずみ ヵ か 数 分 で 入力 で きま す 。 単純 な プロ グラ 
ム な の で わか る と 思い ます が 。 行 番号 マッ 


ENS ALAND MINE BASIC) A F is 


10:78” RANDOM : WAIT 8: 50:РОКЕ F»ESESESESE: 69:PUKE As0:050:50:50 110:ҒОЕ 6-0 TO 9: POKE А || 120: BEEP 1: WAIT : PRINT 
PAUSE “A LAND MINE": POKE 8»69»107»51»4й» ТЙ:ІҒ B$z"à" LET A=A-5 ,44,75,58,45,88: FOR "SCORE "3D 
564: 562493: 509 80: IF A=C THEN 119 89: IF B$z"." LET А-й-1 H=9 70 5: МЕХТ Н: 
29: =63543: じ =F+ RND 9*5 49: IF ñ<=F THEN 188 98:60T0 39 POKE 8»85,54»89,84,2. 
4 PRINT **: CALL 457 98:B$- INKEY$ : IF B$=” 180: BEEP 5:0-0%10: GOTO 9: FOR H=9 TO 5: 
6 ” THEN 38 20 | МЕХТ Н: МЕХТ б 


YINYIN JY У УУУ AUN AU AU AU AN AU AU AU AU AU AU SAU AN ANANAS Aw: 


[വ 
А x 322521242124252122122212121212 ҚАЛАР; 


ANNA SNAIL ^ PD PPS PPS DP DP DP DEAD: 


РС-8001 (18-58) БЕКЕР ശി 
8X8 ド ッ ト ・ キャラ クタ 表示 選好 スク ロー ル _ ത്ത 


20 SCREEN 4,2,2 
39 FOR I-£&HDooo TO £HDOZ29:READ А 
この リス ト は , PC-6001 (16K) の SCREEN @z + F ° AF SIPOKE ലാല്‌ 


4 で 8 メ 8 の キャ ラク タ を 描く サ プ ブルー チン 37. 46 FOR I-*&HD100 TO &HD107:READ D 


Ne EH К $:POKE I, VAL ("%H"+D$%) : NEXT 
ГТ, асс, ご の まま で は キャ ラク を 少し で も マシ ン 語 が わか る 人 は , 逆 ア セ 50 EXEC &HD999』 GOTO 50 


m k A pul ү PE , テー . 69 DATA 11, 95, 65, 21, 99, 21, 06,08 

描い た 瞬間 が わか り に くい の で , 逆 ス クロ ンプ ズル し て CN きい . പേ? OT, 70 DATA AE,EB,71,EB, 2 さ 。 の E。 20, 13 

ー ル ・ ル ー チ ン を お まけ に 付け まし た .。 解析 は か な り 楽 な は ず で す . во DATA ©D,C2, ÒF, DO, 05, C2, 08, D 

ーー оҳи T 2% ë E tpt EE 9@ DATA ЗЕ, 0A, 11, FF, F9, 21, DF, FS 

DATA は 60 行 一 80 行 が キャ ラク タ ・ デ ー キャ ラク タ は , 以前 РіО パー ツ に 出 た 100 DATA 01,00,17,ED,BB, 3D,C2, 1A 
RC, ここ か ら デ ー タ を 取っ て 描い て いる “UFO” を 使わ せ て いた だ きま し た . Терт DOSES 


120 DATA 60,00,3C,7E,FF,A5,.FF,5A 
Е О ЕЛИТА >> ЫЖ? | 
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РС-1261 


BASIC 


男 大 宮 北 高橋 物理 研究 同好 人 


ゲー ム は , と ある 屋敷 の 応接 間 か ら 始 ま 
る ……… 目 が 覚め た と き , あな た は そこ に 立 
TLS 

屋敷 の 名 は ABNORMAL HOUSE( 異 常 な 
家 ). 一 度 入 っ た ら 出 られ な い 複 雑 怪 奇 な 構 
ST, すべ て が 狂気 に 満ち て いる 

あな た は 生き て 出 ら れる こと を 祈り つつ , 
歩き 始め る …. 


POKE& 203C, O を 実行 し て くだ 
者 が カナ ・ 入 一 下 に し だ ちと き う 3 ここ か г ей 
АГС, 

た だ し 。 SMALL シン ボル が 点灯 し て い 
る 状態 で 電源 を 切ら な いよ うに し て くだ る 
с. シャ ー フ "ペン な ど で 本 体 の 裏 を つつく 
こと に な り ま す の で . 本 体 の 裏 を つつ きた 
(Unum, あら か じ め 

10000 “=” POKE&203D, 1 
と 入れ て お いて くだ さい . 万 ーー の 場合 で も 
(DEF (= C SMALL ilf z & 3. 


ラベ ル に 小文字 の C を 使っ て いる 場合 カ 
ある の で , 注意 し て くだ る い . . そ れ 以 外 は 
特に 気 に す る こと は あり ませ ん . 


最初 か ら や る と き は [|pEF|[A| で, 途中 か ら 
jG 2 l S14 DEF (SPACE で 始め て くだ 
きい. RUN は 使え ませ ん . 

ゲー ム を スタ ー ト さる せる と , まず タイ ト 
ル を 表示 し , デー タ の 読み 込み を 行ない ま 


+. кє, 上 段 に 部 屋 の 名 前 と 移動 で きる 
方 向 が 表示 きれ ます . これ は , か っ この 中 


が 動け る 方 向 で , 大 文字 は すぐ ど ぐに 行け る こ 
と を 示し , 小文字 は カギ か が か か つっ つっ 交 いて 今 


すず すでに は 行け な いこ と を 表わし て いま す 。 


コマ ンド 入力 時 に 空 押 し する と LOOK 
と 同じ に な る 

1 つ 前 に 入力 し た 動詞 の 繰り 返し 

1 つ 前 に 入力 し た 名 詞 の 繰り 返し 


また だ た,。 下段 に 表示 きれ て いる の は を その 部 屋 
に ある 物体 の 名 前 で す . 

そし て ,[ENTER| を 押す と コマ ンド ( 表 1) 
を 聞い て くる の で , 動詞 + キ + スペース 二名 詞 
の フル ・ ス ペル の 形式 で 入力 し て くだ る 
L2 

な お ゲー ム は , 以上 の 操作 を 繰り 返し て 
ひだ すら 気長 に 行ない , 無事 に 家 の 外 に 出 
れ ば ハッ ピー エン ド , 魂 だ けし か 出 ら れ な 
けれ ば アン ・ ハ ッ ピ ビー エン ド に な り ま す . 


プロ グラ ム の 説明 


小 き な サブ ルー チン は , 2 m 2" > 2, DER 
に 置 ぶ て あり ます .- こ の デ ロ グ ラム で は ラ 
< だけ で 飛ば し て いま す が ,。 これ は リナ 
ン バ ボー を か ける だ めで , その お か げ で プロ 
グラ ム の 行 番号 が すっ きり し て いま す . 

ағыл, ТТУКШЯХЕТОСЕ Т - 

F ド No で 飛ば し て いま す . 

な お お , 表 2 に メイ ン ・ ル ー チ ン の 変数 表 
を 示し ます の で , 解析 の と き の 参 考 に し て 
くだ るい 


Room No. 
持ち 物 
| カギ 
“ок.” 


名 詞 識 別 etc. 


PLAYING フ ラグ 


e. 


汎用 


| Key フ ラグ 


OPEN BOOK フ ラグ 


в 
C 
D 
Е 
F 
G 
H 
I 
| X 
K 
L 
м. 
Š N - 
O š 
P 
Q 
RO 
8. 
t 
О 
Vv 2: 
ww — 
x š 
Y 
2 


F (17, 5) 
Cit 
С2$ 

C3$ 

64% 


ലാ 


この ブロ グラ ム は 約 7.000 ス テッ プ ', 配 列 
を 入れ る と 9,.000 ステ ッ プ "に も な る の で 入力 
は 大 変じ しょうが 。 碧 張っ て 太 力 し で 《 だ 
る い 。 

EAT, あの PC-1350 で す が 標 準 で は 
3.070 ス テッ プ に 過ぎ ませ ん , し か し , RAM 

ー ド に よっ て 最大 19.454 ス テッ プ に も な 
り ま す 。 き る さら に 。 シリ アル ・ イ ンタ ーー ラ ェ 
イス で 通信 も で きま す 。. 速度 も PC-1261 よ 
り も 速い の で す が 。 PC-8201 を 持っ て いる 
僕 に は 少し 遅く 感じ られ まし だ た だ. 

272, 大 きき が カン ペン ケー ス 程 度 で 
修学 旅行 に 持っ て いっ だ ときには 少し 邪魔 
に な り ま し た が 。 うれし いこ と に 画面 : が ス 


クロ ー ル する の で す / 感動 で す . 


163 


| 
| 


pio 


18: 158. 19൨ 1:15 
INT LsL= INT (L+*10): 
RETURN 

20: “ж”Ез(Йҙ)-””Г2%-С1%» 
C4$203$303$-" 159 
10: RETURN 

38:"DK" IF C AND 2^L 
THEN "NS" 

40:GO0TO "FK" 

50: "NK" IF 001: AND 2 
^L THEN "NS" 

60:"FK" IF Y AND 8 THEN 

4 "Wu" 

TO: IF N»16 AND N21 LET 
HKN)=1 

80:N=3,:0=1: СОТО "FD" 

90:"FO"LzP: 805182 "I": 
IF L THEN "NS" 

180: "FD" CURSOR 24: 
PAUSE D$: CURSOR 24: 
PRINT "You found a " 
3D$CN5 023 ", Bé 057 
80 OR САҢ: 
RETURN 

118: "TH" PAUSE 25:52: 
CURSOR 24: PRINT "Th 
га OLIN a 
: RETURN 

120: “ЫН” WAIT 88: PRINT 
"Where is it?": 
RETURN 

130: "NS" PRINT "Nothins 
special to see.": 
RETURN 

148: "MYK$=" пош”: GOTO " 
ME" " 

150: "E"K$-2" here": GOTO 
"ME" 

168: "Qü"K$z"" У 

170: "ME" WAIT 70: PRINT 
"You сап”: CHR$ 399" 
LIS 1 ESA 
RETURN 


| 189: "DI*J=9: ВЕЕР 4: CLS 


: WAIT 80: PRINT * Y 


ou died." 
199: CURSOR 27: WAIT : 
PRINT ”-------- GAME 


OVER.": END 
280:"à" CLS : CURSOR 6: 
WAIT 0: PRINT "KEY Н 
OUSE 2" 
210: CLEAR : DIM B(1753)。 
C$C110*105 D$C9: 2» *10 
, s E$(0)*20 Е(17»5) 
229IRESTORE "GD": FOR L= 
%2014 TO &293B: READ 
M: POKE (ЭМ: NEXT L 
230:FOR L=&2899 TO %2822 
: READ M: POKE 1»М: 
NEXT L 
240: "GD' DATA &7Es&11*&1 
15&115&TE 
259: DATA &7F5&495&495$&49 
,%56 
260: )АТА &ТЕ› &03› &10› &20 
| &ТЕ 
270: АТА &3Е,&41,&41,&41 
›&ЗЕ . 
280: DATA &7F5&115&315&51 
,%4Е 


290: DATA &TF5&01»s&1E»&01 


390:RESTORE “017: FOR L= 
8 TO 11: READ CSL): 
NEXT L 

400: "D1" DATA "BATHROOM" 
s "BEDROOM" s "EXIT" °F 
LOOR” » "GARAGE" » "KITC 
HEN" 

418: DATA "LABORATORY": "L 
IVING" s "PARLOR", "STO 
REHOUSE" s "STUDY": "TO 
ПЕТ” 

420: ВЕЅТОВЕ “02%: FOR L= 
8 TO 2: FOR М=0 TO 9 
: READ D$(MsLO: NEXT 
M: NEXT L 

430:"D2" DATA "BATHTUB": 
"BED", "BICYCLE" » "BOM 
B” s "BOOK", “ВОХ”, "BRU 
SH": "CAR" 

440: DATA “00507: "DESK" 
» "FREEZER" s GHOST p” 
HAMMER” s "KEY" » "KNIFE 


450: DATA "LAMP" » MACHINE 
"9 " MEAT" » "PAPER" » "PH 


ONE" » "PIG" » "RACK", "S . 


AFE” 

460: DATA “SHIELD” »”SHOWE 
R” s "SHUTTER" s "SOAP", 
“TABLE” s " TELEVISION" 
s “TOWEL” 

4TO:RESTORE “05%: FOR L= 
8 TO 17: FOR M=@ TO 
3: READ B(LsM): NEXT 
M: FOR M=0 TO 5: 
READ FiLM): NEXT M: 
NEXT L 

480: "D3" DATA 2332101152 
:053303052 

498: ТАТА 1,955129295 
, 0,0,2 

599: DATA 321 2301393410301 
3 9 4 

518: 2010 0,0»129,6,5>0,0 
4:21:13 

528: DATA 256:64:0:6:2:09: 
6,5,5,6 

539: DATA 162569118 1 
595 り 5459 ‚ 

(540: DATA 512»0,4»10»2»4» 
9:0:0,2 

550: DATA 0»0»152»,9,4,0,й 

i ‚8,8,4 

560: DATA 0›1,2,5,6›,0›11› 
9:736 

570: DATA 2:0,256:1:12:6: 
8,10,8»15 

“580: DATA 269,99989,9 

° ‚@,9,8 

590:ПАТА 64»0,2»11,4»8»й0 
,12»0:5 

'6800: DATA 0»52»128»8,2»й, 
14,0,11,10 

610:DATA 0,0,80,0,4,0,20 
140,4 

620: DATA 2569 128 了 9 1 
23051551259 

638: DATA 0,512›2,3, 19,9, 
17»16»14»14 

640:ПАТА 128,0,52,4,8»0, 
9518158 

658: DATA 256:0,2»2,1,15, 


KEY HOUSE2 


760:"18" DATA "is 1 door 
type” 
778: “11” DATA "loves the 
peace” 
788: “12” DATA "is a bit 
small" 
798:"13" DATA "is a stra 
nse key" 
888: "14" DATA "is share" 
818:"15" DATA "is fixed" 
820:716” DATA "is very b 
is" 
830: "17" DATA “іс beef" 
840:"18" DATA "is rolled 
paper” 
8509: 19" DATA "is broken 


868: "29" DATA "has been 
killed" 

8780:"21" DATA "is fixed 
on the wall" 

8880:"22" DATA "is strong 


890:"23" DATA “will be u 
seful” 
980:"24" DATA "is choked 


918:"25" DATA "will be n 
ot broken" 
920:"26" DATA "is milk s 
oar" 
928: "27" DATA “is half b 
roken" 
940:"28" DATA "has no sw 
itches" 
950:%29” DATA "is a sPor 
ts towel" 
968: 8212» J21:D$- "Ok. も 
014508" 
970:% " IF 59 THEN ЎА” 
9889: 00518 "x": CLS : 
WAIT 0: PRINT "In °; 
じ ま (B(R53))57 *; 
990:K$z"": FOR L=@ TO 3: 
M=2AL: IF (FCA D> 
AND M?+¢FCA, 5} AND M 
)=9 THEN "f" ' 
1800: IF FCAs9> AND M 
(ЕТ K$=K$+ MID$ (° 
Ң»5:Е»И»”і ж2%1,2) 
: GOTO "f" 
1919:K$=K$+ MIDS (705, 
esus"» L*2*152) 
1820: "f" NEXT L: PRINT 
("$ LEFT$ (KS, 
LEN К$-1);”)* 
1830: CURSOR 24:N=9 
1040:ҒОР L=9 TO 2:0=B(R 
sL): IF 0=@ THEN * 
NI 
1050:ҒОЕ 1159 TO 9: IF P 
(RsL) AND 2AM 
PRINT CHR$ 125: 
L?3:N2445020-2^M: 
IF 020 LET М-9 
1060: NEXT М 
1870: "ni" NEXT L: WAIT 
$ PRINT 7,” 
1888: "P" GOSUB "ж": CLS 
: INPUT "Command: " 
3 E$(9) 
1999: IF E$(9)="" THEN " 


THEN “61” 

1170: IF C3$-"IT" LET C3 
$=C4$: GOTO “el” 

1180:1-(С5%>0%(9>092%С 
35%208(93102: FOR M 
=й 70 9 

1199: IF C3$=D$(MsL) LET 
C3$- STR$ L* STR$ 
МэМ-10 

1200:МЕХТ М: ІҒ М-10 
THEN "CU" 

1218: "e1"E- VAL C3$,F- 
INT <Е/10)»б-Е-Ғж1 
QsH=BCAsF) AND 2^6* 
: GOSUB C1$: IF J= 
1 THEN "P" 

1220: 1-1: GOTO ° ° 

1230: CU" ВЕЕР 1: PRINT 
"I Фоп”; CHR$ 39;" 
t know that word." 
: GOTO "P" 

1248: "CM" DATA "LOOK " 
ТАКЕ”, "SEARCH", "OP 
ЕМ”, "BREAK" s "MOVE" 
s "TALK", "ENTER" 

1258: ЈАТА "SET"»"CUT" 5" 
ENTY "I*s *N*, "S*,* 
MN 

1260:"C8" IF C3$="" LET 
J22: RETURN 

1270: IF H=9 THEN "HH" 

1288: RESTORE C3$: READ 
E$(9): PRINT "It ° 
3E$(9)j"。": RETURN 

1290:%С1” IF H=9 THEN " 
WH" 

1300: IF Е<›3 AND E く >4 
AND Е<212 AND E く >1 
3 AND Е<214 AND E< 
225 THEN "0" 


-1310:PAUSE D$:B(AsF)=B( 


àsF)-2^6: GOTO “Т” 
+ STR$ E 

1520:°75°В=В+1: RETURN 

1330: "T4"B-B*10: RETURN 

1340: 'T12"B-B*100: 
RETURN 

1350: "T14"B=B+1008: 
RETURN 

1360: "T23"B-B*10^4: 
RETURN 

1370: "T12" B-B*18^5: 
GOTO "K"* STR$ А 

1289: 18" IF Q LET F(5, 
0)-9:0-0: RETURN 

1399:C=C OR 128: RETURN 

1488: "൨ "056 OR 1: 
RETURN 

1410: "KZ"F(250)213: 
RETURN 

1428: "KS"FC1550)214: 
RETURN 

1430: "К7”С-С OR 4: 
RETURN 

1440: "K9" IF R LET С=С 
OR 256»R-8: RETURN 

1450:С-С OR 2: RETURN . 

1460: K18" IF S LET F(4 
59)=F(459) OR 4,5= 
9: RETURN 

1479:C=C OR 32: RETURN 

1480: "K11"F(1750)22: 


BASIC) X F ച || 


1570:6070 “57% STR$ E 

1588: 51 IF 8<>9 THEN 
"NS" 

1590:L-1: GOTO "DK* 

1600:%5271-5: GOTO "Dk" 

1619:*S15* IF R<>9 THEN 
"NS" 

1620:L-0,M-5,N-17: GOTO 
“NK” 

1630:"S21" IF A=8 LET N 
=4›0=1›Р=3: GOTO ° 
F0" 

1640:IF =11 LET L=1,M= 
17: GOTO "NK" 

1650:1F 8-15 LET L=3,M= 
12,N=29: GOTO “МК” 

1660:ІҒ =17 LET L=0,M= 
9: GOTO "NK" 

1670:6070 "NS" 

1688: 527" IF A<)3 THEN 
"NS" 

1690:№=7,0=1,Р=7: GOTO 
"FD" 

1700:%529%1-0: GOTO "DK 

1710: "C3"L-1: GOSUB "I" 


145145 (254 AND 120) 
: IF H=@ THEN "HH" 


1720:IF 0204 OR U=1) 


AND E<>8 AND E<>5 
AND E く >19 AND E<>2 
2 AND E<>25 THEN ` 
0” 

1750:6070 *0°+ STR$ E 

1740:704%|-2,М-15, ші: 
GOTO "NK" 

1750:“05“М-2,0-1: GOTO 
"FO" 

1768: "08" GOTO "c"+ 
STR$ А 

1770:"c4" IF C AND 1 
LET 52:05: 058: 
GOTO "FO" 

1780: 0070 "DH" 

1790: 18" IF С AND 2 
(ЕТ L=2sM=5,N=19:; 
6070 "NK" 

1880:GOTO "DH" 

1810:"c14" IF C AND 4 
LET L=4: GOTO "DK" 

1820: GO0TO "DH" 

18380: "c17" IF C AND 8 
LET №=3,0=2,Р=4: 
GOTO "FO" 

1344:0070 "DH" 

1858:"018" IF (С AND 64 
250 THEN "DH" 

1860:Е 8,0) =14,1=9: 
GOTO "TH" 

1878: "025" IF (C AND 32 
)z0 THEN "DH" 
1888: PAUSE D$:F(16502571 
2»J22: RETURN 


1899: "022" GOTO "s"+ ° 


STR$ А 
1980:"s6" IF (С AND 16) 
=9 THEN "DH" 
1919:F(659)=35L=6: GOTO 
"TH" 
1920: "s?* IF C AND 32 
(ЕТ L=2: GOTO "DK" 
1930: "DH" PRINT "You do 


5&TF 19993 . RETURN n"; CHR$ 39:71 hav 
300:DATA &7Es&11»&11»&11 || 660: "80" DATA "is small 1180:C1$-2E$(0): FOR し =1 1498: "К12°Е(11,9)=5: e its key." 
ЕТЕ size" TO LEN Е%(0) RETURN RETURN 
310: DATà. %7Ғ»%40,%40,%540.|! 670: "01" DATA "is revolv 1110: IF MIDS (E$(9) 5 し 1 15008: "K13"C=C ОР 64: 1940: "C4" IF H=9 THEN " 
,%6й0 U ins bed" y=" " LET C1$= RETURN ' WH" 
320: DATA &00:&00;&00:&00 || 680: "02° DATA "has no ti LEFT$ (Е$(@),1-1)› 1518: 1൨40-50 OR 16: 1950:ІҒ EO 15 AND EO 16 
»&00 ге" C3$= MIDS (Е$(0),1. RETURN AND E<>28 THEN "0" 
| 330:DATà &TF&19,&19&19 || 699:"93" DATA "is safe п 41428 15280: "K15" IF T LET F(1 1960:G0TO0 "B'* STR$ E 
;&TF ow" 1120:NEXT L 2,0)=10,Т=0: 1970: “215” PAUSE "Pan!" 
340:DATA &3E»s&41»&41»&41 || 788: 84" DATA "is bible" 1139:CURSOR 24: WAIT : RETURN : BC(NyF)=B(RyF)-2^5 
, &3E 718:"85" DATA "is colorf: IF С1$=*00” LET C1 1539:C=C OR 8: RETURN : IF А<>12 THEN "М 
350: DATAÀ %5Ғ,%40»%40,%40 ul" %-С2%: GOTO "f1" 1548: °К1Т”Е(9,0)=13: 6” 
s&3F 729: "86" DATA "smells ba || 1149:RESTORE "CM": FOR RETURN | 1988: 15811511: GOTO "NK 
360: DATA &46,&49,&49,&49 4” [=й TO 15: READ K$ 1558: 02" IF H=9 THEN " жуылуы " 
‚&31 x 730:"07" DATA "is HONDA : IF K$=C1$ LET C1 WH” മ്‌ 
.370:DATA &ТР,&51,&51,&51 City” 8-“С7% STR$ 1,1=2@ || 1560:ІҒ Е(21 AND E<〉2 =6: GOTO “ТН” 
‚@41 748: "98" DATA "has а Чоо || 1159:NEXT L: IF 1:16 AND Е<215 AND Е‹›2 || 2ggg:*B28vL=2: GOSUB "I. 
389: DRTR 540,61Е» &QF s &OF С. と < THEN "CU" 1 AND E<>27 AND EX v: ТЕ L=9 THEN "H° 
:&06 š iUe DATA 15 nade o 1160:"f1" IF C3$="* >29 THEN “М5” 2918: 0502 *BR*:L=8,N=1 
wood 
T 2 KET | | 


PIO 


KEY HOUSE2 BASIC リス ト 


8: GOTO "DK" 2160:С15 : WAIT 8: CURSOR 24: PRINT " "NK" WAIT : PRINT "x": 
2828: "BR" PAUSE "Bomb!" PRINT "The "5:D$(1» You were confined. 2390:"U26"L-6: GOTO "DK RETURN 

1:4: GOSUB "I": 12:% said»" * GOTO "DI" , 2490:"R" PRINT LEFT$ «E 

IF L=ð THEN "DI" 2178: CURSOR 24: WAIT : 2270: "E18" IF (С AND 64 2400: °С10° IF 1159 THEN 8(09%7 " 855: 
2030: B(AvF)=B(AsF)-2AG: PRINT CHR$ 34; "Set )=B THEN “ИМ” “ИН” RETURN ١ 

RETURN "3D$C33005" in 9 2288:PAUSE "Bans!":J-8: 2418: IF Е<›17 AND E<>29 2588: "IN" DATA 3303419: 
2948: "C5" IF 1459 THEN " С%(0;9:%,” CURSOR 24: PRINT * THEN "0" 231545153232 


WH” 
2050:IF Е<›1 AND E<>8 
AND E<>19 THEN 70” 
2060: GOTO "M"+ STR$ E 


2180:С15 : WAIT 8: 
PRINT "Then you ca 
n 30 to "5 CHR$ 39 
ысы Ж. + Ж, м.) 


You were frozen.": 
GOTO "DI" 

2290: "C8" IF Е<›3 THEN 
IP 


2429:B(RF)=B(R5F)-2^5 

2439:J=9: PRINT "This h 
as Poison!": СОТО 
TRES 


2510:”C12"L=9: 


2529: "012151: 


GOTO "G0 


GOTO "GO 


2070: "M1" IF 909 THEN CHR$ 34 2500:1=0: GOSUB "I": IF 2440:"C11" IF B=9 PRINT 25380:"C14"L-2: GOTO "GO 
"NS" ` 2190:CURSOR 24: HñIT : L+I=9 THEN "MH" "You have noth ins м 

2080:1=7: GOTO "DK" PRINT “Тһе “091, 2319:B=B-1: PAUSE "യാം ": RETURN 2540: "1552 

2090:"М8” IF ñ<>14 THEN 153" disaPPeared。" om!":L-4: GOSUB "I 24580:CLS : WAT” L 2558: "60" IF മംദാ 
"NS" В(В»12-Ү-2, Ізі: v3 IF L=9 THEN "DI = INT (М/ IF AND 24L)=9 PRINT " 

21800: IF Е‹14,0)=15 THEN RETURN М L LET E$«8 de You can"; CHR$ 39; 
DT 2200: "C7" IF H=0 THEN " 2320: IF А<›13 RETURN + STR$ L+”) "t 30 there. ": 


2119:F(14 ぅ 9)=13 し =3: 
5070 “ТН” 
2120: "M19"L-3: GOTO "DK 


2150: 06” IF H=9 THEN ° 
WH” 

2140:IF Е<211 THEN “07. 

2150:L=1: GOSUB "I": IF 
L=9 PRINT "He said 
s "5 CHR$ 34; "Set 

"5D$C338D55"!"j 

CHR$ 54: RETURN 


WH” 

2210:IF E<>7 AND E<>8 
AND Е<210 THEN "0" 

2220:60Т0 "E"* STR$ E 

22350: “ЕТ” IF (С AND 128 
)z0 THEN "MW" 

2249:PRUSE "Booonm!": 
GOTO "DI" 

2258: "E8"LzCA»90 *CA?13) 
448216: IF (С AND 
2^1)=0 THEN "MW" 

2260:PAUSE "Bans!":J-8: 


⑧ 鈴木 猛夫 


a euge. 
EA X ORE 
OTF 25, 


ちゃ ん は 暗い 所 が 大 好き な 
回 り に 電球 が あっ て 上肢 し く て 仕 


方 が あり ませ ん . そこ で 電気 回 路 を うま く 


動か し て すべ て 消 そ う 


と す ഗമ, Ж 
% を 少 され て は だ た だい へ ん と , 


コン デン サ や 


ダイ オー ド が 根 暗 ちゃ ん を 襲っ て くる の で 


D. 
ゲー ム の 説明 


あな だ は 根 暗 ち My を 操作 し て , 


ENITOSTUM ` 


[n] 22 


LL, RED < 


ん が ダバ EE SSS ン サ に 捕まる と ミ 


ス に な ひま す 。 


また だ, 根 暗 ちゃ ん は 落ち て いる 乾電池 を 
拾っ て コン デン サ た だ た ち を 感電 きせ る こと が 


Cài», 


間違っ て 電球 を つけ て し まう 


と し く て 気絶 し て し まう の て で 気 を 付け て 


を 
な お, 
気 に な り 1 面 クリ 


電球 を 全部 消す と 根 暗 ちゃ ん が 元 
"ia 6 


pre 
р222222222242222722 ZA | 
തര അര? 
222222222212. 
എ; 


2339:F(1359)=6: CURSOR 
24: PRINT "South ы 
all was broken. ": 
RETURN 

2348:"C9"* IF 1158 THEN " 
WH" 

2550:ІҒ Е<>20 AND Е<>26 
THEN "OQ" 

2368:L-23: GOSUB “I”: IF 
L=9 THEN “Ы” 

2310: G0T0 "U"* STR$ E 

2388: "U280"L-23,M-3: GOTO 


С050В "R':Mz.:-L*18 
^9: IF М=0 THEN "i 


RETURN 


2460: RESTORE "IN": FOR 
N=9 TO 4:L=N: 
GOSUB 71%: READ 0, 
Р:Е%9(й02-0%(0»Р): 
IF L 00518 "R*:MzM 
-18^N: IF 1158 LET 
N=4 

2470:МЕХТ N 

2480:71” CURSOR 47: 


2569:14017 8: PRINT D$:A 
=F(ñ,L+1)sJ=2: IF 
В<18 RETURN 
2579: IF =29 THEN "GL" 
2588: CURSOR 24: WAIT 78 
: PRINT "Kaboooon! 
1%: GOTO "DI" 
2599: "01. "759: BEEP 5: 
CLS : CURSOR 7: 
WAIT : PRINT "ALL 
OVER.": END 


根 暗 ちゃ ん パ バ パニック 


図 1 
タイ オド 


ちょ こま か と 直線 的 な 動き 


動く 


Rg 


Dd 
р222222222272222227222222 (баң 
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登場 キャ ラク タ 


5% RER 


AKA 


じっと し て あ 
まり 動か な い 
Ж, とつぜん 
お そっ て くる 


を する 


電球 


42 全体 画面 
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BASIC 


Малд вча ی کے‎ ര сел کہ‎ തങ്കി 
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Ена ганы 


PB で 麻雀 を ノ と 思い た っ て , な ん と か 
それ らし く 作 っ て み ま し た . 峠 の 数 は 10 種 
類 , RODAR) TTH, 符 の 計算 や 翻 
数 の 判定 は PB が や っ て くれ ます . 


E] 


MEIE 1 — 9 ОЖОР LED 0 だ け で , 各 
AP bv IT プレ イマ ヤー は テン ・ キ ー で 
切り たい 幅 の 種類 を 指定 し ます . 上 が る と 
き は | = TTI, ノー テン の と き は 無視 
きれ ま す . 

NT SEDI tS "HAITE と 表 
示 き れ た ら , [EXE] キー を 押し て 続け きせ て 
(775 (海底 で な いと き は 表示 が あり ま 
xA). 

する と 数 字 が 表示 され ます が 。 これ は 左 し 0 は 当 だ り 牌 に は な り ま せん . 振り 込む て 入力 し が な いと 入ら な い 行 も あり ます . 
മഥ, 81%, 得点 と な っ て いま す . な お + "RON" の 右 に 今 ま で の 得点 が 表示 きれ 
得点 = 4 XX 2 の 翻 数 乗 で す の で , mH v. 

が 1 つ 上 が る と 単純 に 得点 が 倍 に な り ま す な お 。 АХО. 

ii, 符 の 切り 上 げ は 行なっ て いま せん . そ 
Dk [EXE] キー を 押す と 総 得点 が 表示 され ま 
す . 


表 3 


表示 説明 


振り 込み まし た 


HAITEI 海底 で し た 
ж 流 局 で す 


中 


PiO に は MSX の プロ グラ ム が あま り 載 
り ま せん ね . その うち スラ ンプ を 脱し た ら 投 
を し て , 振り 込む と ゲー ム ・ オ ォ オーバー で 稿 し ます . MSX だ っ て 使い こなせ ば か な b 
т», これ は 最初 に 決め た 牌 と 同じ も の を ⑯ 初 め に 必ず DEFMS を 実行 し て くだ さき さい. 面白 いじ マ シン な の で す よ . 
捨て る と 振り 込ん だ こと に な り ま す .。 だ た だ @ 笑 数 は 表 2 に 載っ て いる も の に ., 自 換 と 場 参考 文献 
കാലത്തെ 028) ( 計 3 翻 ) を プラ ス し て 表示 し ます . 栗原 安行 : “初歩 の 麻雀 ", 日 東 書 院 
@⑯ 役 に 対す る 番 数 は 適当 に 決め た も の で す . 
@⑯ リ スト 中 に カッ コ を 閉じ て いな い 所 が あ 
り ま す カ が, ちゃ ん と 動き ます . また , 詰め 
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先月 に 引き 続き , 今月 も 堂々 1 位 の ザ ・ と いう と ころ で 1 位 の 座 を 逃し た も の の 来 また , 初 登場 で いき な り 3 位 入り し だ 叉 
コッ クビ ピッ ト . 4 位 の PC-8801/mkII 版 共 | 月 は も し か し だ た だら …. 1 版 ホ バー アデ アタック, 5 位 の PC-6000 シ リ 
々 どこ まで 1 位 の 座 を 守り 続け る か 楽し み с, 先月 号 で 注目 株 と し て 紹介 し た だ た ソ | 一 ズ 版 ロボ ッ ト ウ ォ ー ズ な どの 新 製品 も 忘 
CT. まだ ただ, いよ いよ FM-7 版 が ・ ユ コック | フト の 一 つ で あっ た だ PC-8801 版 ムク の 郵便 | れ て は な ら な い 注 目 株 と いえ ます . 
ビッ ト が 発売 し な り 。 こ ちら の ラン キン グ | BSA (旧名 郵便 屋 る きん ムク ) മ, 予想 さて 来 月 は いよ いよ 年 末年 始 の 激戦 期 層 
入り が 待ち 遠 し いか ぎり で す . た ぶん 来 月 どおり ベス ト 10 入 り し て きま し た だ た. この ゲ | に 突入 し ます が ,。 それ ぞ れ の ゲー ム が どん 


号 で は 顔 を 見 せ て くれ る で し ょ う 。 ー ム は PiO 8 月 号 で 掲載 きれ だ も の の バー | な 戦い を 行ない , 来 月 号 で は 何 位 に 入っ て 
- 方 。 こち ら も 先月 に 引き 続き 2 位 の 座 ジョ ン ・ ア ッ プ さき され た 商品 で す が 。, 今後 ど 1 くる ヵ か 楽し み に 待っ て いて くだ る きい. 
を 守り 続け て いる F15- イ ー グ ダル. いま 一 歩 こま で 上 位 に 入っ て くる か 楽し み で す . 
順位 | 前 月 度 の 順位 Т | 機 種 | 価格 (メデ ィ ア ) 
ザ ・ コ ッ ク ピ ッ ト X1/MZ-2200 Ұ4,800(С) 


F15- イ ー グ ル Y 3,500(C) 

ホバー アタ ッ ク ¥ 3 800(C) 

『・ コ ッ ク ピ ッ ト ¥5,800(D) 

x x ТЕЛО, 

Y 5: 80005) 

v 3, 800(C) 
нз 00) 

ZEUG 
Y5.800(D) 
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BASIC 


この 家 に は , 不気味 な 怪物 (ゴー スト ) 
が いる と 村 の 人 が 言い まし た . 

そこ で , 勇敢 な あな た は 怪物 を 退治 し に 
GC し た し か し 。 あ を た の 本 
当 の 目的 は 怪物 退治 で は な く , CORO 
こ か に 隠さ れ て いる ゴー ルド を 捜し 出す こ 
と だ っ た の で す . 


AAA 


特に 注意 する 点 さ あり ませ ん が , リス ト 
を よく 見 て 間違い の な いよ うに 入力 し て < 
EXE 


ШАЎ 


この ゲー ム は リア ル タ イ ム の アド ベン チ 

—c, [SHWFT][O] で スタ ー ト し ます .。 5 

な だ は 自分 を 操 つ り , 家 の 中 に 隠 る れ て い 
る ゴー ルド を 提 や し 出し て くだ る 

操作 方 法 は [4[e| キー て 左右 に 動き , = 
図 コマ ンド の 使用 方 法 


この よう な 状態 に し て O を 押す 
『 フ 開い て この よう に な る 


間 革 に 入る 場合 この よう に し て 
| 1 を 押す 


PB 
18 ЧАС :19=°1°:64= 
реу“: Мок 
[44-13 
= 4p 
30518 348: IF. Сз 


マン ド അ を 実行 する と き は , 実行 し た 
い 物 の 1 つ 左 に き て キー を 押し ます (В). 

な お , 登場 キャ ラク タ の 説明 を 表 2 に 示 
ETT. 


7712774 0)8209A 


表 3 に 行 番号 マッ プ 。 Ж4І- ЖЖЖ 
Ue PES ERS HT HIRT С СУУ 
さい 。 


EI 


あま り 端 に より すぎ る と , あな だ は 壁 に 
Жа TREAT まい ます 。: また 
スト は 1[ 匹 だ け で す (テレ ポー ト が で きる 


=— 


DD 5). 
それ か ら 。 は こ や ド ア を オォ オー ジン し よう 
と し て も 開か な いと き は カギ カ が カカ っ て い 


БРЕД ҮҮ, Q 
*! コマ ンド 一 覧 BiG 


オー プン (ドア ・ 箱 を 開け る ) 


。 | ムー プ ( 箱 な ど を 動か す ) 

` | イン (部 屋 に 入る ) 

。 | テイ ク ( 物 を 取る ) 

。 | ルッ ク ( 物 を 見 る ) 

。 | ピック (ビック を 使う ) 
ガン (ガン を 使う ) 
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表 3 
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20~ 80 

90~220 
230~320 
380—440) 


ドア の 形 
| ゲー ム の 進行 状態 
5 の 部 屋 の 箱 
ゲー ム の 進行 状態 
開い た ドア 


自分 


Key 

OK 

開い た 箱 

ゴー スト 

ルッ ク し た と き の 物 
ゴー スト の 位置 
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東京 都 らぶ MIN 多摩 市 デジ ャ プー 国 本 Fë 


(カリ フォ ルニア 在住 ) 

カリ フォ ルニア 育ち の トレ ー シ ー さ ん は , X 

達 が 日 本 人 で PiO や IL/O を 読ん で いる の で , 

NR の コー ナー も お な じみ と か ヵ ゎ , 日 本 語 は 読 

め な いけ ど , 中 の 写真 は 時 々 見 て いる そう 
ШТУ, MM プス ・ カ レッ ジ に 在学 中 の 彼女 

カレ ッ ジ を 卒業 し た ら 美 容 関係 の 学校 に 行 

ЖАСЫР ы CE. 
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古河 市 アッ プル ・ ベ ア 


MZ-5A001 


Ш.:-а-::-4/%-/27 (MZ-5A001) (š, (48) ¥ 16,800 


MZ-1500 を 家族 で 楽し め る ソフ トウ エア 7 (問い 合わ せ 先 〉》 シャ ー プ (株 ) 
種 を パ バック に し た も の で す . 大 阪 REE BIRR 
INE) 99545 大 阪 市 阿部 野 区 長池 町 22-22 
ゲー ム ソ フ ト 2 種 , ワー プロ ッ ソフト 1 種 , = (06) 621-1221 (大 代表 ) 

ミュ ユー ジッ クン ソン フト 1 種 。 BASIGC 学習 シフ 東京 東京 支社 業務 部 広報 

ト 1 種 。 ホー ムダ イア リー 1 種 ,。 パー ティ 99162 東京 都 新 宿 区 市 谷 八幡 町 8 
ーー 用 ソフ ト 148, 操作 マニ ュ ア ル , BASIC ТҰ (03) 260-1161 (大 代表 ) 


va Wi カラ ー バ パン フレ ビレット 


ブロ ッ ク バ ー ス ター 


CG-200 


圏 プ ロッ ク バ ー ス ター (CG-200) は , ボー p 主要 回 路 素子 ワン チッ プ C MOS-LSI 
JU を 上 手 に 受け な が ら , 次 々 と デ ロ ッ ク を മ. EI: ൨132772731 

こわ し て いく LSI ゲ ー ム で , ワイ ド な 透過 മം. iii eî JJ :0.007W 
型 カ ラー 液晶 を 採用 する こと に より , Жж. (価格) Ұ4,900 
黄 ・ プ ルー の カラ フル な プ ブロッ ク が 表示 さ (問い 合わ せ 先 》 カシ オ 計 算 機 (株 ) 広 報 室 
れ ま すず 。 160 東京 都 新宿 区 西新 宿 2-6-1 

《 主 な 仕様 》 ® (03) 347-4830 


多 機能 AV パソ コン 


HC- / 


* > > = 
> m os көже жән 


じ D コ ン バ ク トブ レー ヤー 
D-50 


(D-50) は , p ライン 出 力 端 子 組み 込み etc 


較 C げ コン バク ト プ ブ プレー ヤー 


直径 12cm の CD の 大 き さ に 合わ せ た マ ル チ (48) D-50 Y49,800 AC-D50 (ACT 
・ ユ ー ス の プレ イヤ ー で す . タフタ) Ұ5,000 

《 特 徴 》 (問い 合わ せ 先 》 ソニ ー( 株 ) 

boe 軽量 、 低 消費 電力 9141 東京 都 品川 区 北 品川 6-7-35 


> 語音 質 . デジ タル サウ ンド f? (03) 448-2111 


2% (03) 


ШНС-7(3, AV 機器 と の ドッ キン グ に よ 

りり オーディ オ ・ ビ ジュ アル の 世界 を 広げ る, 

MSX 対 応 の 多 機 能 型 AV パー ソナ ルコ ン ピ 

ュー タ で す . 

スー パー イン ボー ズ 機 能 内 蔵 

p 4 つの 内 蔵 ソ フト (ファ ー ム ウエ ア ) を 
塔 載 

»RAM64K^34 F EX 

アナ ログ RGB 出 力 , RF 出力 装備 

:2 ス ロッ ト 設 計 

(48) Y 84,800 

(問い 合わ せ 先 》 ビク ター・ イ ン フ ォ メ 
ーション ・ セ ンタ ー 

2100 東京 都 千代 田 区 門 が 関 3-2-4 വയ്യ 

580-2861 


NewProducts News 


RGB14 型 カラ ー デ ィ ス プレ イ 


画 NH-14DS は , 精密 な ドロ ー イ ング が 要 
求 さ れる CAD, また デー タ ・ ベ ー ス の 統計 
解析 な ど に 応え る ドッ トピ ッ チ 0.31 ミ リ の 
高 精細 ・ 高 解像度 ハイ コン トラ スト プラ ウ 
ン 管 採用 の ディ スプ レイ です. 

《 主 な 仕様 》 
入力 信号 : 映像 R・G・B・I モ セパ レー ト 
方 式 
入力 コネ クタ : 8 ピン 角 型 コネ クタ 
解像度 : 640 ド ッ ト メ 400 ラ イン 

(48) Ұ128,000 

(問い 合わ せ 先 》 

(株 ) ニ デ コシ ステ ムコ ンピュータ 営業 部 
101 東京 都 千代 田 区 神田 松永 町 1 

宮沢 ビル 3F 
ff (03) 253-0761 (代表 ) 


ライ トペ ン ソ フト 内 上 蔵 


MPC-10MKII 


BIMPC-10MK II は , ラ イト ベン ソフ ト を 内 p RAM : 32K バ イト 土 V-RAM16K バ イト 
蔵 し た MSX バ パソ コン で す . (О) Y75,800 — 
《 主 な 仕様 》 《 問 い 合わ せ 先 〉 三洋 電機 (株 ) 
p. СРО: Z-80A コ ユン パチ ブル 570 大 阪 府 和 守口 市 大 日 東町 100 番 地 
> ROM : 32K バ イト (MSX- BASIC) = (06) 901-1111 (代表 ) 


8K バ イト (ライ トペ ン ROM) 


画 セ ガ ・ エ ンタ ー プ ライ ゼス より , SC-30 
- 00 シ リー ズ , お よび SG-1000 シ リー ズ 用 の 
チャ ン ピ オ ン ボ クシ ング & チャ ン ピ オ ン サ ッ カ ー 新作 ゲー ム ソ フ ト が 発売 され ます . 
СЖ) チャ ン ビ ピオ ン ボ クシ ング 4,300 
チャ ン ピ オ ン サ ッ カ ー ҰЗ,800 
(問い 合わ せ 先 》 
(株 ) セガ ・ エ ンタ ー プ ライ ゼス 
宣伝 部 広報 係 
8144 東京 都 大 田 区 羽田 1-2-12 
Т? (03) 742-3171 (大 代表 ) 


LEUEL ROUND TI 
1. ; EM 555 
З. rue A. i dt Ж 3 шл 


教育 用 ソフ ト | ന്ത o» w 


; ETE 2 a ; 
圏 ス トラ ッ ト フ ォ ー ド の CAI シ リー ズ に , (問い合わせ 先 》 к 100 ШШ 3 зө 
新た に MSX 用 (32K 以 上 )3.5 イ ンチ ディ スク スト ラッ ト フ ォ ー ド ・ コ ンピュータ セン タ |: ші 118 
版 の 教育 用 ソフ ト が 加わ り ま し た . ー( 株 ) ТЯ т) 90 
(78) Dur 
ФО Y18,800 336 埼玉 県 浦和 市 南浦 和 2-36-15 
rp UE is $19,800 Т? (0488) 85-5222 (代表 ) 
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新 製 品 紹 人 7 


大 きき は , ほぼ A 4 А (08307 х 1.17210 х 

8, 前 33, 後 49mm). B5 版 の PiO 誌 より 
は 一 回 9 大 きか がい に \ や うた お と こら デザ サザ I 

本 体 で まず 目 に つく の は , キー ボー ド の 
左側 に ある JOYPAD 1 と 書か れ だ た 大き な 


キー バッ ド で す .。 これ は 一 見 カー ソル ・ キ 
ー に 見 えま す が , そ う で は な く て (本 物 の カ 
ー ソ ン ル ・ キ ー は キー ボー ド の 上 段 に 別に あ 
り ま す ) ジ ョ イス ティ ッ ク の 役目 を する も 
の で す . PV- 7 に は 他 に トリ ガ ボ タ ン の 役 
目 を する キー が あっ て , ジョ イス テッ ク が 


必要 な ソフ ト で も 本 体 の み で 実行 で きま す . 


キー ボー ド は 俗 に に う キ ャ ラメ ル ・ キ ー 


ボー ド で , 1cm 角 の も の で す . 電動 タイ プ 
ライ ター 風 の キ ー ボ ー ド と 比較 する と 残念 
な が ら 少 々 見 劣り が し ます が ,。 この タイ プ 
の キー ボー ド と し て は , 押し や すい 部 類 に 
入り ます 。 

や は り 電 卓 な どの 技術 力 の ある カシ オォ な 
ら で は と いっ た だ 感じ が し ます . 価格 な ど を 
考え る と , な まじ 形 だ け 電 動 タ イプ ライ タ 


ー 風 に し て , その 実 押し に 《 い キー ボー ド 
を 付け る より は 正解 だ と 


mu i31. 


基本 的 な MSX 仕 様 で , 前 述 の ジョ イス テ 

ィ ッ グ ク (ジョ イ ・ パ ッ ド ) が 1 つ 本 体 に 合 ま 

れ て いる (も ちろ ん 外 付 に ジョ イス ティ ッ 

ク も 使え ます ) 以 外 は 特別 は 機能 は な いよ 

う で す . RAM は 8 17. К, スロ ッ ト は 1 
TUI. 

《 価 格 表 》 
| PV-7 ¥ 29,800 
KB-7 ¥ 14, 800 


һы 拡張 ポッ クス 
| OR-216 Дк hy ¥ 7,800 


バハ 
OR-208 (本 体 用 8K バ イト ) | ¥ 5,800 


(Д | FA-32 ж 3,000 


TJ-7 Ұ 2,900 

ХЖЛ | TP-7 ¥ 19,800 
ー ダ |KR-7 y 12,800 
y 4,800 


Ұ 4,800 


ІІ P, RF 切 9 換え スイ ッ プ 
(V を コン ピュ ー タ の 画面 も し て 合う と 
VM の プン ジテ アテ ア と ロン ゼ ュ ユー クタ の RE 出 
力 を 切り 換え る た だ ため の も の ), RF ケー ブル 
(本 体 と TV を 結ぶ ケー ブル ), AC ア ダ プ タ 
(本 体 の み の 場合 は この アダ プ タ よ り 5 電源 


を 取る ) な ど が 付い て いま す . 

この 内 RE 切り 換え スイ ッ チ は TV を モ 
ニタ の 代わ り に 使う 人 で あれ ば , 結局 買う 
(また は 自作 する ) こ と に な っ て し まい が ち 
な の で , 始め か ら 付 属し て いる の に は 感心 
SA 


150 ur 
Le 


"-&JvLULT, Жы”, "Wn", "fl 
5" ERR Lc МЕНЕЕ СТ. “Ж 

” は いわ ゆる 取り 扱い 説明 書 , “解る "は 
ue イド (BASIC の マニ ュ ア ル ), "fil 
BITTY AAT SVP INTO 
グラ ム 集 ) で す . マ ニュ アル は 割 と よく ま と 
まっ て いま す が , 一 番 厚い "М2" TSA 
58 ペ ー ジ し か な いい ので, いか ん せん ボリ ュ 
ー ム 不足 で BASIC を 本 格 的 に 勉強 し よう 

思っ て いる 人 は 他 に 何 か BASIC の 参考 

ETE ETT LVDS だ だ も し, 20? 
പാഷ ഡാ? 
い マ ニュ アル で ,。 読ん で いる うち に 簡単 な 
ゲー ム が 作れ る よう に な っ て し まい ます . 


PV- 7 に は 拡張 用 ユニ ッ ト (KB- 7 ) が 


あり ます . これ を 付け 加え る と RAM が 16K 
SALE, プリ ンタ ダ ・ イ ンタ ダー フェ イ 
ス が 加わ り , さら に スロ ッ ト が 本 体 の も の 
と 加え て , 3 個 に な り ま す . 

まだ , 拡張 ユニ ッ ト を 付け 加え た 状態 で 
は 本 体 の 電源 は 、 拡 張 ユ ニッ ト よ り 供 給 き 
бі, また だ PV- 7 本 体 に 拡張 ユニ ッ ト と 一 体 
化す る だ め , 電源 コー ド や ケー ブル が 多く 
な っ て 困る と いう こと が あり ませ ん . 

その 他 の ォ デ シ i hise SON 
格 の と ころ を 見 て 〈 く だ 


PV 7 の 発売 上 L tt MSX 用 の ゲー ム 


ソン フト が 発売 され まし だ ただ. 今回 は 。 ഗേ? 
も 大 障害 競馬 と 熱戦 甲子 園 と いう ゲー ム ・ 


77. УЬ У C 
本 体 の み で 実行 可能 で , 当 
シン で も 遊べ ます . 

る て ゲー ム の 内 容 で す が , 名 前 の と お り 
競馬 の ゲー ム と 野球 の ゲー ム で す . 大 障害 
競馬 に は , 遊び 方 が 2 通り あっ て , 自分 が 
騎手 に な っ だ つも り で , うま く 馬 を 操る も 
Ot, どの 馬 が 勝つ か に 賭け る 。 いわ ゆる 
競馬 ゲー ム が 遊べ ます . 

熱戦 甲子 園 の 方 は コン ピュ ー タ 対人 間 , 
また は 人 間 対 人 間 で 遊べ る リア ル タ イ ム 型 
の 野球 ゲー ム で , 投 IES PREAS y 
ー ド , ЖА, WER, 守備 な ど , すべ て ジョ 
イス ティ ッ ク ま だ は キー ボー ド で ユン トロ 
Р А 


л мы. nt 
5 7а У граб саған, салыса ne 


どちら も PV- 7 
ЖО MSX = 


ES aS АА ои 
2 DE ҮРЕ! u 
は 4 мые VS баў? 


асв 本 体 価格 が 29. 800 と MSX パ 


ソコ ン で は 一 番 安 い / 拡張 ボッ クス を 加 
えて Ъ#44,600& 05 ന: 70077. た 
だ , 本 体 の RAM が 8K バ イト と 少な い の は 
パソ コン を 始め か ら 使え る 人 に と っ て や や 
不満 か も し れ ま せん . LL, 本 体 だ け の 
と き は , ゲー ム ・ マ シン と し て , ある い は 
入門 用 マシ ン と 考え れ ば これ が 妥当 と 言え 
る で し まう | CLT Чор. {ы = 
シス テム ・ ア ッ プ で きる の も 大 変 鯨 力 的 で 
す . 


purs മ 

| セン ト し ます 。 ご 希望 の 方 は 葉書 E 
Th ജം 年 齢 を 記入 し て 下記 まで 送 | 
| っ て くだ きい с, ame 1 Rwa b 


b Lec いた だ きま +. | 
Ок» ж) dun о 
2 CCC EL 


í. o 


11 月 中 旬 か ら NEC (日 本 電機 株 式 会 社 , 
日 本 電機 ホー ム エ レ クト ロニ クス 株 式 会 
社 ) は , PC-6000 シ リー ズ の 上 位 機 と し て 
"PC-6001mk I| SR" と バテ レビ バンソン コン 
Mr. PC" の 2 機種 の 販売 を 始め まし た . 

PC-6001mk II SR は , PC-6000 シ リー ズ と 
ソフ トウ ェ ア が ほぼ 互換 性 が あり , 周辺 機 
器 も 共通 性 を 持っ て いま す . その 他 に 最大 
2.000 文 字 表 示 , 640 ベ メ 200 ド ッ ト の カラ ー グ 
ラフ ィ ッ ク , スー パー イン ボ ポーズ, FM 音源 
な どの 機能 が プラ ス さ れ て いま す . 

テレ ビバ パソコン Mr. PC は ~PC-6601SR” 
と ディ スプ レイ テレ ビ ヾ PC-TV151” の シス 
テム て で て, 基本 機能 は PC-6001mkIISR と 同じ 
で その 他 に , ワイ ヤレ スリ モコ ン ・ キ ー ボ 
ー ド , 3.5 イ ンチ ・ フ ロッ ピー ディ スク な ど 
の 機能 が 加え られ て いま す . 


価格 は PC-6001mkll, PC-6601 に 比べ て 
それ ぞ れ \5.000-\12.000 高 く な っ て い 
る だ け で , 相変わらず ロー コス ト , ハイ パ 
フォ ー マ ン ス ・ マ シン で す . 


ペグ クベ ペン ЖУ 
/ “уу 
> 


AZ NN 


С PC-6001mk II SR と PC-6601SR に は 起動 
時 に モー ド ・ セ レク ト が あり ます . モー ド 
は 7 つ あ っ て , その うち 5 つ は IHH6601 と 同 
UT, 残り の 2 つが SR シリ ー ズ に 付け 加え 
られ だ モー ド で す . これ は , "N66SR 
BASIC" と "VIDEO TELOPPER" の モー 
ド で す . 以下 SR に 加え られ た 新 機能 を 機能 
別に 説明 し ます . 

モー ド が 7 つ に …… 


(1) グ ラフ ィ ッ ク 機 能 ア ッ プ 
N66SR-BASIC モ ー ド で は 80O 文 字 メ 25 
行 の 2.000 文 字 表示 が 可能 に な り ま し 
2. グラ フィ ッ ク は , 640X200 ド ッ ト 
の カラ ー グ ラフ ィ ッ ク で ドッ ト 単 位 に 
15 色 中 の 4 色 を 任意 に 選ぶ こと が で き 
id. 320X200 ド ッ ト で 使う 場合 は ド 
ッ ト 単 位 に 15 色 が 使え ます . 
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2.000 文字 表示 640 メ X200 ドッ ト の グラ フィ ッ ク 


(2) 


スー パー イン ポー ズ 機 能 

テレ ビビ 画面 と パソ コン 画面 の 合成 を 
する 機能 で です. これ は ディ スプ レイ ・ 
テレ ビ PC-TV151 と 組み 合わ せる こと 
Cop NTR TASS SAT 
画面 と パソ コン 画面 と の 合成 を し て , 
VTR に 収録 する こと も 可能 に な り ま 
43. スー パー イン ボー ズ は ホー ム ・ ビ 
デオ 時 代 に は な く て は な ら な い 機 能 だ 
ょ 想い ます : 


(3FM 音 源 方 式 の デジ タル ・ シ ン セ サイ ザ 機 


能 

従来 か ら あ っ た だ 3 声 の PSG に 加え ぇ 
て FM 音源 デジ タル ・ シ ン セ サイ ザ 3 
声 を 加え , 6 ENT, 8 オク ター プ ブ の 
間 を 出す こと が で きま す . FM 音源 方 
式 は 波 型 設定 や 音色 の コン トロ ー ル に 
すぐれ な た 方式 で , 従来 の PSG に 比べ い 
ろ い ろ な 種類 の 楽器 音 や , 自然 界 の 音 
を 出し だ り ,。 ゲー ム な どの 効果 音 も よさ 
り リ アル に な り ま す . 


(4) ボ イス ・ シ ン セ サイ ザ 機 能 


PC-6601 と 同じ よう に 音声 合成 し た 
音 に 音階 が 付け られ る よう に な っ て い 
iJ. 音階 域 は 2 オク ター プ で す 。 音 
声 デ ー タ が 大 幅 に 変わ っ て いる だ め , 
スク リー ン 3 て 漢字 を 目 い っ ぱい 表示 


大 変 聞き 取り や すく な っ て いま す . 4 
れ 以 外 は 従来 の ボイス ・ シ ン セ サイ ザ 
と 同じ で す . 


(SIERO MPN 


従来 と 同じ 〈《 教 育 漢字 を 含む 1,024 
文字 の 漢字 ROM を 内 蔵 し て いま す . 
640 メ 200 ド ッ ト の グラ フィ ッ ク 表 示 が 
可能 に な っ だ た だめ, この モー ド で は 漢 
字 の 大 きる が 小さ きく な り 見 や すく な っ 
て いま す . 1 画面 に 40X12.5 文 字 の 漢 
字 が 表示 で きる わけ で ,。 これ は 1 クラ 
ス 上 の マシ ン と 同じ レベ ル で す . 

また 日 本 語 ワ ー ド プロ セ モッ サ が 添付 
され て いる の で , 手軽 に 日 本 語 の 文章 
を 書く こと が で きま す . オプ ショ ン の 
拡張 漢字 ROM カ ー ト リッ ジ (PC-6601 
-01) を 使う と JIS 第 1 水準 まで 拡張 す 
52 EATS WT. 


(6 WIEBE SF ORE 


ハードウェ ア に よる 効率 が 良く な っ 
た た め 。 従来 の モデ ル よ り も 実行 速度 
が デップ し て いま す . 実行 速度 が 速 け 
ты. VLA OAT So ЕЧ КОШ 


右 の SR が PAINT を 終え る 頃 , 左 の 1 日 6000 は ? 


り い くら で も 遅く する こと が で きま す 
3j, 遅い も の は ソフ トウ ェ ア が と う 頑 
張っ て も それ 以上 速く する こと は で き 
ませ ん . 実行 速度 は 速 け れ ば 速い ほど 
良い わけ で す 。 


7)N。。SR-BASIC 接 載 


従来 の N。。-BASIC, Neo- 拡張 
ВАСІС, N。。-BASIC に 加え , N。。SR- 
BASIC を 実装 し て いま す . N。。SR- 
BASIC に 加え ぇ られ た 命令 は 次 の と お 
eT; 
⑩AUTO… 行 番号 の 自動 発生 
@BGM…PLAY 文 実行 の 制御 
@⑯DEFUSR… 機 械 語 プ ログ ラム の 実 
行 開始 番地 の 定義 
@ERASE… 配 列 変 数 の 消去 
OÓERL, ERR… 発 生 し た エラ ー の エ 
ラー コー ド , 行 番号 を 与え る 
ERROR… エ ラー 発生 の シュ ミレ ー 
F, エラ ーー 番号 の ユー ザー 定義 
@GRIP$… 指 定 し た セミ グラ フィ ッ 
クキ ャ ラク タ ・ コ ユ コード を 持つ 文字 を 
2.4൭ 


@⑯MENU… メ ニュ ー 画 面 に 戻る 
⑳OCT$…10 進 を 8 進 に 変換 し . その 
文字 列 を 与え る 

ФОМ ERROR GOTO… エ ラー 割込み 
を 可能 に し , エラ ー 処 理 ル ー チ ン の 開 
始 を 定義 する 

⑳⑱PALET… カ ラー バレット を 変更 
PLAY…6 重 奏 ま で の 音楽 を 演奏 
し 98, 

⑮ROLL… グ ラフ ィ ッ ク 画 面 を 縦横 に 
スク ロー ル さ る せる (ステ ー ト メン ト ) 
で ROLL…ROLL に よっ て スク ロー ル 
し だ た ドット 数 を 与え る (関数 ) 
SPACE$… 任 意 の 長き る の スペ ー ス 
文字 列 を 与え る 
⑯STRING$… 任 意 の 文字 を 任意 の 数 
だ け 与 える 

WAIT… 入 力 ポ ボート を モニ タ す る 間 , 
プロ グラ ム の 実行 を 停止 する 
⑮WIDTH… テ キス ト 画 面 に 表示 する 


桁 数 を 指定 する 
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と に か く 〈 音 が 大 変 良く な っ て いる の に は 
感激 で す . 従来 の PSG 音 源 が 短 形 波 ど っ た 
の に 対し , FM 音源 で は 複雑 な 波形 を 出力 
する こと が で きま す . この た だめ, 様々 な 楽 
器 の 音 や 動物 の 鳴き 声 な どの 効果 音 を 作り 
RTS ETAL EGTA TOIT 

Nes SR-BASICOPLAY XT iz `@” を 使 
うこ と に よっ て 簡単 に 12 楽 器 の 音色 を 使え 
る よう に な つか ます ТЕКЛИ 

PLAY `@10cdefgab” 
と する と ビ プ ラフ ォ ン の 音 が 出 ま す 。 も し 
SR を 使う 機会 が あっ た ら 6 ぜひ 実行 し て み 
ちく だ さき るい. 大 変 い い 音 が 出 ま す . 

きる て 効果 音 を 自分 で 作ろ うと 試み た と こ 
ろ , FM 音波 部 の レジ スタ が 非常 に 多く , と 
て も 初め て の 人 に 使い きれ る も の で は あり 
ませ ん で した. FM 音源 用 の 1IC に は , な ん と 
146 も の レジ スタ が ある の で す . まあ , これ 
だ け の レジ スタ を 設定 する か ら こ を そ , どん 
な 複雑 な 音 も 出せ る わけ で す が …。 と に か 
く 効果 音 作成 用 の 優れ た ソフ ト が な いと 使 
え そ う も あり ませ ん . 

SR の も う 1 つの 特徴 は , 2.000 文 字 表示 . 
640X200 ド ッ ト の カラ ー グ ラフ ィ ッ ク 。. ІШ 
面 に 2.000 文 字 を 表示 る せる と PC-6001 の 
イメ ー ジ が また だ 変わ っ て し まい ます . あの 
大 き な 文 字 が 今 ま で の PC-6001 の 特徴 だ っ 
だ の だ か ら . これ で か な り 本 格 的 な 使い 方 
MCSQCUIJ. 

640X200 ド ッ ト で カラ ー4 色 が 使え る と 
いう こと は … な ん と PC-8001mkII を 超え 
て し まっ て いる の で す 。 しかし, SR は この 
な ため に X11 や PC-8801 の よう に 特別 の こと 
は し て いま せん . 今 ま で 画面 2 枚 ど っ だ の 
を 単に 1 枚 に し だ だけ の こと で す . 当然 320 
200 だ っ だ の が 640X200 ド ッ ト に な る わ 
け で す . 

画面 2 は この よう な グラ フィ ッ ク 画 面 と 
し て 使え る サイ ズ が あり ます 。 そし て 、。 テ 


機能 仕様 表 


PC-6001mkII SR PC-6601SR 
メイ ン CPU uPD780C-1 (Z80A コ ン パ チ プ ブル ) 


иРО80С49 х2 
N66SR ВА5ІС КОМ N66SR BASIC ROM 


N66 BASIC 32KB N66 BASIC ROM 32KB 
漢字 ROM 32KB 漢字 ROM 32KB 
CG ROM 16KB CG ROM 16KB 


音声 合成 、 番 組 予 約 ROM 
メイ ン お よび ビデ オ RAM 


64KB 
(最大 128KB) 
ІКВ 


64KB 
(最大 128KB) FD バ ッ フ ァ 用 RAM 
N60-BASIC お よび N60 拡 張 BASIC モ ー ド 


文字 モー ド 32 文 字 メ 16 行 2 色 X2 組 
т 6997192 esa j 64X48 ド ッ ト 9 色 
カラー グ ラフィ イッ クィ モー ド 128X192 ド ッ ト 4 色 X2 組 


2 t гуе, E 256X192 ド ッ ト 2 色 X2 組 


N66 BASIC モ ー ド 


N66SR BASIC モ ー ド 


音階 機能 付き 
内 蔵 


ボイス ・ シ ン セ サイ ザ 
(音声 合成 ) 


| CRT イ ンタ ー フ ェ イ ス | 


スー パー イン ポー ズ 機 能 
能 


フロ ッ ピ ー デ ィ ス ク 


内 蔵 イ ンタ ー フ ェ イ ス 


キス ト 画 面 と し て 画面 1 が 別に あり , こち 
ら は サイ ズ が 小さ きさく, グラ フィ ッ ク 画 面 と 
Же А ӘЗ ТУІ T 
スト 表示 が 80X25 の 2,000 文 字 に な っ た だ た 
b. テキ スト 画面 を PC-8001 と 同じ 160※ 
100 ド ッ ト の グラ フィ ッ ク 画 面 と し て 使う 
こと が で きま す . この と き の V-RAM の 使 
い 方 は PC-8001 の それ と 似 て いま す が , 7 
トリ ビュ ー ト の 使い 方 が 違う の で 互換 性 は 
AA OTT 

PC-6001/mkII は グラ フィ ッ ク 関 係 の 命 
令 処 理 速 度 が 遅い たい うこ と が あり まし た . 
SR は ハー ド が 改善 され , 処理 速度 を アッ プ 
本 いる と いう S ESO C U S y > k ЕЕ 
比較 を PC-6001mkII の モー ド で 行っ て み 
あだな 。 

PAINT 命 令 を 使っ た な テキ スト で は な ん 


文字 モー ド 40 文 字 メ 20 行 15 色 

セミ グラ フィ ッ ク ・ モ ー ド 80X40 ド ッ ト 15 色 
15 色 グラ フィ ッ ク ・ モ ー ド 160X200 ド ッ ト 15 色 また は 8 色 
4 色 グ ラフ ィ ッ ク ・ モ ー ド 320X200 ド ッ ト 4 色 X6 組 


文字 モー ド 40 文 字 X20 行 15 色 
40 文 字 X25 行 15 色 
80 文 字 X20 行 15 色 
80 文 字 X25 行 15 色 
15 色 グラ フィ ッ ク ・ モ ー ト 320X200 ド ッ ト 15 色 
4 名 グ ララ フィック: EF 640X200 ド ッ ト 


音楽 機能 RENTS 
(内 3 音 FM 源 方 式 デジ タル ・ シ ン セ サイ ザ ) 


AE (任意 語 出 力 に より プロ グラ ム 上 で 自由 に 発声 可能 ) 


(教育 漢字 996 字 を 含む 1024 字 ) 
RGB/ 同 期 信 号 分 離 方 式 
専用 テレ ビ (PC 一 TV151) と の 組み 合せ に より 可能 、 


e 


フロ ッ ピ ー イ ンタ ー フ ェ イ ス 内 蔵 


プリ ンタ ・ イ ンタ ター フェイス セン トロ ニク ス 社 仕様 準拠 
カセ ッ ト ・ イ ンタ ー フ ェ イ ス PSK 方 式 (600、1200 ボ ー) 


シリ アル イン ター フェ イス RS-232C と イン ター フェ イス (オプ ショ ン ) 


カラ ー バ レッ ト 機 能 に より 15 色 中 4 色 


さら に VTR 収録 も 可 


赤外線 方 式 

ワイ ヤレ スリ モコ ン ・ キ ー ボ ー ド 
(ケー ブル 接続 可 ) 

3.5 イ ンチ マイ クロ ・ フ ロッ ピー 
1 ドラ イブ 内 蔵 

320KB/ ド ライ ブ 

本 体内 で ドラ イブ 増設 可能 


PC-6001mkII SR は , PC-6001mk П を 内 
部 に 持つ 別 の マシ ン と いう 気 が し まし た . 
PC-6001 や mkII の モー ド で 従来 の ソフ ト 
の ほとん ど が 使え , SR の モー ド で は 640※ 
200 ド ッ ト の グラ フィ ッ ク , 2,000 文 字 表 示 , 
FM 音源 , N。。-BASIC と 従来 の PC-6001 と 
は 1 クラ ス 上 の マシ ン の 機能 が 使え ます . 

実際 に ROM の 方 は N。。BASIC ROM を 
含ん だ と いう 形 で は な く , N。。SR-BASIC 
ROM が これ と は まっ た だ く 別 に 存在 する と 
いう 形 に な っ て いま す . 要する に 2 つの マ 
シン が 1 つの ハー ド を 共有 する と いっ た だ と 
ころ で す . ちな み に こ れ は 余談 で す が 。N。。 
SR- BASIC ROM に は BIOS が あり ます . 2 
れ は ユー ザー が 利用 し や すい と いう こと も 
あり ます が , 今後 SR の きら に 上 位 機種 を 作 
る と し た だら 互換 性 を 保ち や すい と いう こと 


と 8 倍 も の 違い が あり ます . これ は ハー ド で す . 

の 改善 し いう こと も ある と 思い ます が , 7 (価格 

ルプ ブリ ズ ム 自 体 を 変え て いる と 考え られ ま PC-6001mkII SR Y 89.800 
+. 他 は 今回 の テキ スト で は 数 パー セン ト PC-6601SR Y 155,500 


の チッ ゲ で し た 。 


PC-TV151( カ ラー ディ スプ レイ テレ ビ )\ 94,800 


175 


、 則 バン ダイ より 発表 され た ロボ パ バル? 

は パソ コン で 操作 で きる ラジ コン ・ ロ ボッ 
F. キー ボー ド で 直接 操作 し た り , 707 
ラム し て 何 度 も 同じ 動き を 繰り 返さ せ た り , 
いろ ん な 遊び 方 が 考え られ る 愉快 な ロボ ッ 


ടം 


ro Pe 
nu m 


2. 2 `у 


ロボ パル は 本 体 と コン トロ ー ル ・ 
ト に 分 か れ て いま す . コン トロ ー ル ・ ユ ニー 
у F iz, パン ダイ RX-78 の 場合 , BS- 
BASIC カ ー ト リッ ジ ( 別 売 ) の り の カセット ・ イ 
ンタ ー フ ェ イ ス に 接続 し ます . 他 機 種 の 場 
合 は プリ ンタ ・ イ インター フェイス と 接続 し 
217. 

ロボ スル 本 体 は 全長 185mm, 全幅 250mm, 
全高 152mm。 重量 620g で , 最大 速度 25cm/s, 
航続 時 間 は 約 3 時 間 , 電波 の 到達 距離 は 見 
通し 直線 距離 で 約 10m と な っ て いま す . ff 
用 電源 は 動力 用 と し て 単 3 乾 電池 3 本 , 受 
信 機 用 ほ と し て 006P(9V) 1 AT, 送信 側 に も 
006P(9 V) 1 本 を 使い ます . 

ロボ フッ パル 自体 は 前 進 , 後進 , 左右 回 転 , 
腕 を 上 下る きせ る こと が で でき, それぞれ の ア 
クシ ョ ン は ディ スプ レイ を 見 な が ら 指 令 
る こと が で きま よ ます. 

Сіз, ロボ スバ パル 添付 の コン トロ ー ル ・ ン ソ 
フト の 概要 を 説明 し ます . 

まず プロ グラ ム を RUN す る と タイ トル 
画面 が 出 て , いずれ か の キー を 押す と メニ 
ュー 画面 に な が り ま す . 227. 

ы АЫ E T AT 

・ リ アル タイ ム ・ 


アク ショ ン & ト セー 


の 3 つの モー ド の 内 1 つ を 選択 で きま す が , 
まず 初め に は 1 の コン スト ラク ショ ン ・ テ 
スト の モー ド を 選び ロボ フル を 走行 な よび 
回 転 き せ て 実 走行 値 と の 誤差 を 補正 し て か 
62, 3 の モー ド へ 進み ます . 


UF, 各 モ ー ド の 説明 を し ます . 


ms Eh F лаш at “a 
ЕШ! mw аш” Aa. = 


ТЕЕ 

ШЫНЫ 
合わ せ ぜ 。 走行 
具体 的 に 


о ボラ フマル pî ——— 
11435 X Ont fa ce 44% + +. 
は 。 この モー ド に 入る と, 


€«€CONSTRUCTIONH TEST»»5 
ーTURN DEGREE?- FORMWA^R TEST 
ожа сыр 4550 ? Әк 


le le à — 
we TURN. ы ыы 
. «NOM L.TURN? 


З:АСТІОМ TEST 


・ プ ォ ワ ー ド ・ テ スト 


・ 人 ターン ・ テ スト 
Ше шаа с АЛА ro Tm. 


の 3 つの チェ ッ ク を し ます . まず 1 の フォ 
ワー ド ・ テ スト で は 。 ロボ バル を 50cm 前 後 走 
行き せ , 実際 に 走行 し た 距離 と の 差 を 補正 
LC, パン コン か ら の 指令 で 正しい 距離 だ 
け 移 動 す る よう に し ます . 

2 の ター ン ・ テ スト で は , ロボ パル を 左 
4360711824, 上 記 と 同様 に 実際 の 回 転 
角 と の 差 を 補正 し ます 

3 の アク ショ ン ・ テ スト は , ロボ フス バル の 
腕 を 上 下る せ て 正しく 動作 する か どう か を 
"vocc ET. 

以上 の 3 つの テス ト を 行なう こと で , ロ 
ボル が パン コン か ら の 指令 で 正しい 動き 
を する よう に 校正 する わけ で す . セン サ な 
と が 付い て いれ ば , この よう な 作業 は 必ず 
し ゃ 必要 あり ませ ん ば , イン ター フェ イス 
や 制御 ツウ フト が 大 きく 《 く な っ て し まう の で , 
パッ コン か ら の 指令 を 受け る だ け の 機能 に 
限定 し た だ め 動 作 の チェ ッ ク が 必要 と な っ 


ШП TETTE LH ШЫН LH 

HE ЕН: 
РУЫ. ша 
эр お Jaj: 8 а ана! ; д 
1 [| E Р IBV чиш 
ーー < 


Шағын че dis 4 ステ ッ ク に 
гесу Б ало у. 207629, 
ディ スプ レイ 上 に ロボ ラル の 動い た 軌跡 が 
表示 きれ , その 動き を トレ ー ス る せる こと 
も で きま すず す 。 | 

まず メニ ュー 画面 に より この モー ド を 選 


CCREAL~ TIME ACTION 8. TRACED? 


iscale $280coms 


>ТІМЕ 


in 25s 
>D ISTANSÊ FE 


ぶ と 写真 の よう な 画面 と な り ま す . まず , 
画面 の 縮尺 を セ モット し て , ロボ パル の スタ 
ー ト 地点 を セ モット し ます . あと は RXX-78 の 
場合 は カー ソル ・ キ ー, 他 の 機種 の 場合 は 
テン ・ キ ー ま だ は ジョ イス ティ ッ グ ク に よっ 
て ロボ パル を 操作 し ます . その と き , 移動 
距離 と 移動 時 間 が 画面 に 表示 る れ , 終了 キ 
— [E] を 押す か ,, 指令 の ステ ッ プ が 50 ス テ 
ッ プ に な る まで ロボ バル を 動か すこ と が で 
AT, 

リア ル タ イ ム ・ ア クシ ョ ン を や め だ ただ 時 点 
で トレ ー ス ・ モ ー ド に 入り ます . ト レー ス 
モー ド で は , それ まで の ロボ フッ パル の 動き を 
記憶 し て いて , 画面 に 表示 る され て いる ロボ 
メル の 軌跡 に 従っ て 走行 アク ショ ン を 行 な 
333. 

‘READY 7 と 表示 され て いる 場合 は , H 
び リ アル タイ ム ・ ア デア ク ショ ン の 最初 に 戻り 
id. “REPEAT ?” と 表示 きれ て いる 場合 
3, メニ ュー 画面 に 戻り ます . 


キー ボー ド か ら > ロボ パル の 動作 を 入力 L, 
画面 上 に 走行 ライ ン と 走行 内 容 を 表示 し て 
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の に 必要 な も の 


シン ミュ ピー ト し , 後 で ポン や タレ に トレ ヒー スネ 
exi. 
この モー ド を 選ぶ と 画面 は 写真 の よう 
<<5ІМОГАТІОМ>> 
[COMMAND SET'J 


iscale «$45O0cm* 


は は は 


R. 
F 
R. 
F 
R. 
F 
R. 
Е 
L... 


ZUD | Ora NOW 


ZW യയയയയയയയ 


VDV 
^C 


>DISTANEE EN 
9.99 т 


2%, CSC VT ARA AT Уи уб 
トレ ー ス の と き に 同様 に 画面 の 縮尺 を セッ 
ト し ます . 次 に ター ゲッ ト を 設定 する か を 
決め ます (ター ゲッ ト と は , 画面 内 に 表示 す 
る こと の で きる 目標 の こ と で す ). それから 
ロボ パル の スタ ー ト 地点 を セ モット し , モー 
ド 設 定 も し ます (モー ド t iz, ロボ パル の 走 
行 速度 と 走行 中 の アク ショ ン を 可能 に する 


も ので, 細か な 走行 ・ ア クシ ョ ン を 設定 で 


34). 

以上 を 設定 する と コマ ンド 入力 の モー ド 
に な り , ここ で ロボ バル の 動き を 設定 し ま 
す . 

設定 は ロボ バル の 移動 キー を 使っ て 行 な 
いま す が , モー ド の 設定 し た 場合 と し な 


か っ だ 場合 に 大 きく 分 か れ ま す . モー ド の 
設定 を し た 場合 は , 移動 方 向 と 移動 量 を 決 
め る ご と に , 移動 スピ ー ド と 走行 中 の アク 
ショ ン を 設定 する こと が で きま す 。 モー ド 
の 設定 を し な か っ た 場合 は , スピ ー ド の 変 
更 や 走行 中 の アク ショ ン は 行 な を ませ ん . 

コマ ンド は 終了 キー[E]| を 押す まで , ま 
だ は 50 ス テッ プ ま で 入力 で きま す 。 入力 が 


終わ る と “ОК COMMAND ?" と 表示 され, 


ここ で [Y] キ ー を 押す と トレ ー ス を 始め ます 。 
[N| キ ー を 押し た 場合 は 1 ステ ッ プ ご と トレ 
ー ス し, 数 値 の 変更 し た あと トレ ー ス を 始 


め ま す . 
トレ ー ス が 終わ る と リア デルタ イム ・ ア ク 
ショ ン の と き と 同 様 の 方 法 で , メニ ュー に 


さき て この ロボ バ パル で 一 体 何 が で きる の で 
し ょ うか 。 マニ ュ ア ル に は 遊び 方 例 と し て , 
荷物 取り や タイ ム ・ レ ー ス な ど が 書か れ て 
ます が や は り , 自分 の パソ コン で ロボ ッ ト 
(自動 車 や 戦車 な ど ぼ で は な 〈《, ロ ボッ ト で あ 
る と いう こと が 重要 な の で す ) を 動か す と 
いい うこ と が 最大 の 楽し み で は な いか と 思 
いま す 。 

ロボ バル 操作 プロ グラ ム 例 


また 付属 の ソフ ト で は 50 ス テッ プ の 動作 
し か で きま せん が 。 ロボ バル の コン トロ ー 
ル の メイ ン の 部 分 は パッ ケー ジ 化 され て い 
kd. 使い 方 は マニ ュ ア ル に 詳し く 〈 書 か れ 
て いる の で , 自分 で ロボ パル を 自由 に 動か 
す プ ログ ラム も 簡単 に 作れ て し まい ます . 


Шо жил, Е 


ロボ バル 


《 価 格 〉 


Ұ16,800 
(対応 機種 〉 


・ バ ンダ イ RX-78 

・NEC PC-8800 シ リー ズ 
PC-6000 シ リー ズ 

・SHARP X1 シ リー ズ 

・ 富 士 通 FM-NEW7/7 


こん な 感じ の オリ ジ ナ ル ・ プ ログ ラム で ロボ バル を コン トロ ー ル で き て し まう . 


CLEAR さ の 9。&HSFFF : LOADM "ROBOM" 


MD=&H6 の の の 


SP-MD-*1:AC-MD*2: TM=MD+3: FW=MD+5: BK=MD+8: RT=MD+1 1 : 751214 : AT=MD+17 
INPUT "SPEED LEVEL (1-35): "5KD: IF KD く 1 AND KD>3 THEN 40 
POKE MD,0:POKE SP,KD:POKE AC, O 


GOSUB 89 


WHILE DMY$«»"E":GOSUB 80: WEND: END 
DMY$-INKEY$:WHILE DMY$z"":DMY$-INKEYS$: WEND 


IF DMY$-"8" THEN PRINT "FORWARD 
IF DMY$-"2" THEN PRINT "BACK 
IF DMY$-"5" THEN PRINT "RIGHT TURN ";:EXEC RT:PRINT "OK'"zRETURN 


"3sEXEC FW:PRINT "OK!"zRETURN 
"S:EXEC BKsPRINT "ОК!" : RETURN 


IF DMY$="4" THEN PRINT "LEFT TURN 
IF DMY$="A" THEN PRINT "ACTION 
RETURN 


"ssEXEC LTsPRINT "ОК!" : RETURN 
"3sEXEC AT:PRINT "ОК!" : RETURN 


177 


“DANONZIPYY—ZS 


X1: dB-BASIC 
バ パソ コン ・ ギ ヤル の с 


Begin 
The 
BASIC 


ビギン ・ ザ ・ ベ ペー シッ ク 


ШОВ-СА! S 


寒い ね っ 7 


寒い 日 が 続く 今日 この ご ろ . 皆さん の 住 
ん で いる 所 は , も う 雪 が 降っ た か な ? 札幌 
は ホワ イト ・ ク リス マス を 待つ だ け . 何と 
な く ロ マン チッ ク し た いな ん て 思っ て し 
まい ます . 

と は 言っ て も , そう いう 話 っ て な か な か 
ころ が っ て いな い / グ や っ ぱり , DAN ФО 
だ る まで も 作っ て 即席 の 恋 入 に し て し まお う 
と 考え て みた り し て る の で す . 

DAN ウ バ パズル も , いよ いよ 大 詰め ノ も は 
や , ラス トス パー ト の 一 歩 手 前 と いう と こ 
ろ ま で 来 で し まい まし た 。 

9595959597 959090 


ы 
Die ee eee SS: 

ST, 前 回 で は 音楽 を 流す 命令 の PLAY 
文 を 勉強 し まし た が , 今回 は そこ か ら も う 
ちょ っ と 進ん で , SOUND 文 に 挑戦 し て し 
292:Ж207 す 。 

だ も 和え ば 。 Ma RAY IAD 
ТІР, TAT > — 7 UM VL 
シッ ク 」 と いう 爆発 音 で . ずい ぶん 気分 が 
盛り 上 が っ だ だり し ます . 25 ЭХ 
か せな い の が SOUND 命令 で びす. 20% 
令 は , 音源 の PSG を 直接 操作 し て 音 を 出し 
|4 PSG の プロ ッ ク 


[| テ チャンネル B | 
ISIS 


| チャ ン ネ ル C | 


[Rs] 0—15]R | 0—255 


(п 


ЖЖ. と いら て 8 ҰАК ТЕ? 
Со, まず PSG の 説明 か ら 始 め ま す よ . 
PSG の 中 に は 3 チャンネル の オシレータ (൧ 
発生 装置 ) と ノイ ズ ジ ェ ネ レー タ (雑音 
生 装置 )., エ ン ベ ロ ー プ "ジェネレータ (波形 


BEBE), そし て 3 つの アッ テイ ィ イネ ー タ 
音量 制御 装置 ) が 内 蔵 る きれ て いま す . > 


まり , 簡単 な シン セ サ イ ザー 機能 を 持っ た 
ആമന. 
そし て SOUND 命令 を 使う に は , Ro 一 
Ris の レジ スタ に 値 を 入れ て あげ な く て は い 
け ま せん . 
PSG の 中 に 数 値 を 書き 込め る 14 個 の 箱 が あ 
リス ト 1 


SOUND 7,62 
SOUND 8,15 
FOR 1-1 TO 10 
SOUND 0,160 
SOUND 1,0 
FOR I=1 TO 
NEXT I 
SOUND 0,200 
SOUND 1,0 
FOR І-і TO 200 
NEXT I 

NEXT J 

SOUND 7,62 


表 


ぇ えっ? レジ スタ っ て 何 っ て ? ま D, 


る と 思っ て くだ きい ね ( 図 ). 

この 図 は PSG の プ ブロック な ん で すけ ど , 

も う 少 し わか りや すく する だ め に 実例 を や 
っ て み ま し ょ う グ この 実例 は 救急 車 の 音 , 
そう 誰 で も 知っ て いる 「 ピ ー ポ ボー ゼー ポポ 
ー」 と いう アレ で す . あん まり 歓迎 し だく 
な い 音 で す が , ま あ 部 屋 で 1 人 で 聞く と 意 
外 に 新鮮 か も … (と いう の は , や っ ぱり 和 無 
理 が ある か し ら …)。 

と いう こと で 。 今度 は 王 に 注目 ./ わ っ ん 
な っ な ん だ これ は !? と 叫ん で し まい そう な 
ЖТР, おびえ る こと は あり ませ ん 。 - 
hik, さっ き の PSG の ブロ ッ ク 図 の 表 な 


実例 プロ グラ ム 


チャ ン ネ ル 設 定 , A の み 使 用 に 設定 
A チ ャ ン ネ ル の ポ ボリューム 最 大 


トー パチ ャ ン ネル に "ピー" の 音 の デー タ を セッ ト 
500 a 
時 間 か せき 

|— ^ テ チャンネル に “ポー" の 音 の デー タ を セッ ト 


時 間 か せき ぎ 


“ピー” の 音 と き の レ ジス タ 値 


B E: А B に z Ж B aer 
レジ スタ No. 0 10 進 デー タ 16 進 デー タ 


178 


DTT, ELT, これ を 普通 の プロ グラ ム に する の / 
し だ の が リス トト 1. では, 表 と リス ト 1 の 


Үсіоск 
関係 に つい て 教え て あげ ば ます. Lits 
i$. പഗ്‌ で は す の ゆ の チャ タ 16 x f 
ネル A・B・C の うち , A チ ャ ン ネ ル だ け 
を 使っ て いま す . 表 の レジ スタ ク (Вт) の f: 実際 に 出力 し た ない 音 の 周波 数 
FU FERT EE fclock : ハー ド に より 得 ら れる 周波 数 


(X1 の 場合 2MHz) 
定数 
と いう こと で 。 チャ ン ネ ル A に 入る デー タ 
は こん な 風 に な り ま す . 


Bs B4 Вз B» Bi Bo 
NOISE TONE 


СТА UC BN 


この 場合 は , さっ きも 言っ た と お り チ ャ 
ン ネ ル A (TONE “А”) だ け を 使う の で , (ハー ド の 周波 数 ) 
そこ だ け ON, 他 の と に ろ は 全部 OFF に し 16x (出力 し た い 音 の 周波 数 ) 
ます (ON が 1 で OFF が 0 な の に , この 図 


で は 反対 で すね . Tb, 間違い で は な いん | _ 2000000 - 

TT. ここ で は , NOISE: ТОМЕ と いう ` 16x780 _ 

風 に バー が 入っ て いる の で , 1 と 0 が 遂 転 

し て し まう の ). こ の 111110 ほ と いう の を 10 進 これ を , レジ スタ の Ro と Ri に モッ ト し 

法 に 直す と 62 に な り ま す . ます . Ro は 下位 8 ビッ ト , Ri は 上 位 4 ビ 
ZIT, リス ト 1 の 行 番号 100 を 見 る と , ッ ト の デー タ が 入る の で , 計算 式 は ? と い 
100 SOUND 7, 62 $ gÑ 


FF 9; RIK OLEATE CTET A 
ント は , 2 進 法 を 10 進 法 に 直す と いう と こ 
ATT, これ は 算数 で 習っ た よね 


わた し は NEW-VIP が 好き です. ゲーム 
な ん て 側 に も 寄れ な い , 簡易 言語 の 気 高 い 
世界 , 毎日 鳴り 響く 電話 の 音 が , 私 を すっ 


Ro=Data MOD 256-160 


Ri=Data Ұ 250-0 


次 に A チ ャ ン ネ ル の ボリ ュー ム は と い と こう な る の で 。 行 番号 130・140 の か り 成 長 さ せ て くれ まし た … 
うと Rs で す . これ は Rs の Bo ~ Bs の と ころ 130 SOUND 0, 160 ユー ザー の 皆さん , ゴメ ン な さい . 私 だ 
で すけ ど , 数 値 は 15 が 最大 値 で す . 152 2 140 SOUND 1, 0 っ て 努力 は し て いる の で す / で も で も 。 Z 
進数 に する と 1111 で す . あら ら , B4 は 何だ に な る の で す .「 ポ ー」 の 音 も 同じ よ ょ うに な ライ ド 高 い 彼女 (NEW-VIP で すっ ) っ て 
7 と 思っ だ 人 は えら い ぞ っ ク 実 は 。 こ こ に っ て いま す 。 ば 私 を 執 挑 に 拒む の で す / ち ょ っ と 知っ て 


1 を 入れ て 10 進 法 の 16 に する と , エン ベロ %555%585959%950:05050205029 


ー グ が 使え る の で す . 
テンペ ロー と いう の は 。 一 定 の 音量 で 
音 を 出す ん じゃ な く て , 0 一 15 ま で の 音量 
を ある 波形 に し て 音 を 出す と いう こと で す . 
を そして, その 波形 の 種類 々 を エン ベロ ー フ >* 
ター ン で 選べ ば いい の で す 。 この 「 ピ ー ポ 
ー」 の ブロ グラ ム で は 使っ て いな いけ ど ね . 
次 に 「 ビ ピー ポー」 の 「 ピ ー」 の 音 に つい 
C, ちょ っ と 説明 し ます .「 ピ ー」 の 音 は お 
ょ そ 780Hz で す . これ を 計算 する 式 は こう 


_ クレ NI UCM MENS UNE 『 リス ト 2 DAN パ ズル 基本 プロ グラ Д യോയോ 


15010 CGENO:COLOR3,0,0,0:CLS4: GOSUB 1500 Í 


Ø: TEMPO6Q00: SOUND1 3 , 1: PLAY"V1 SRO" 

15020 LOCATE 2,1:PRINT " ttti м н @ 
таш шит шш 
LOCATE 2, 2 PRINT LE ини ж 
E E 88, а" 


LOCATE 2, SPRINT 線 wow м, 


LOCATE 2,4:PRINT™ ж жән W шш 4 


LOCATE 2,5:PRINT" MN ë шж ш "| 


man пш mam шш ШЕШ”: COLORS 
15070 LOCATE 2, 73 PRINT" "STRINGS (23,"— 
E in TT <" 
15080 LOCATE 2, METERS | 25 ニ ン ノ カラ フル ナ キ ^ PWS 
チラ 、 ス ペー テ i 
15090 LOCATE 2, еркегі 17° W= LF rk -nI727" 
я» l ” 
15100 LOCATEZ, 10: "О IDAN/Z t". C9" U, Or. 
VAIS pil 
15110 LOCATE2, യന In^ വം. レット" 76779 
റി 6 
15120 LOCATE2, മംന്‌ ШМК” etch. жуз” % 
т?л» I 
1515@ LOCATE2, LESS RINT? 19440 тй Gane ov 
er こ ニナ リフ マス | 
15140 LOCATE2 。 14rPRINT・ INET TIS サイ 。 PU 
ZZ し LE ラコ エ | 
15150 LOCATE2 。 каны LIDAN PUZZLE. *" キル 
nr? I ы 
15160 LOCATEZ, “sapaqa, ЭЙ. PRA Me E 
) 3 "4 
1517@ КИ 17а кант" | 8 


15180 СОСате2, —Ó 4+64 (Move key) 
രിള മാധ 


15190 1 ОСАТЕ2,19:РКІМТ" 1 2 
| TEST % 
15200 (.ОСАТЕ2,20:РКІМТ" | 


20262 
о ^ 3 e. 
9:910: 
SCO е 


今回 は , お り ょ と 短 に グモ グラ なの で 
ち 込 みち らくちん. す で で きる と 思い ます . 
$ C, 次 回 は いよ いよ 最終 回 . ^ š CO 
プロ グラ ム を 見 直し て 待っ て て ネ / 


5% 529 


る か ら っ て イ バ リ まく る K は , そん な 私 を 
バカ に し ます . Cb, 私 は 負け な い Z/NEW 
-VIP の バー ジョ ン ア ッ プ を / 漢 字 版 を 目 
ざし て , いつ か 日 の 光 が 当 た る よう に 私 は 
頑張 り ま す . そし て , 電話 の 音 に ビビ る こ 
と な く , より た くま し い 知 識 を 持っ て 皆 さ 
ん の 前 に 登場 し た いと 思い ます -. 

… そ う C$. 私 は NEW-VIP が 大 好き で す 
は や し みき 


| PATTERN I" 


) 
15220 CGEN1 : COLOR 


15250 LOCATE 29,10:PRINT"n^* n^'*"i:LOCATE |. 


29,11:PRINT"oX  oX";:LOCATE29,14:PRINT"n 
" n'"s:LOCATE 29,15:PRINT"oX ол" $ 
15240 CGENO:COLOR 6,,1:CSIZE2:LOCATE 6,2? 
S:PRINT4O,"HIT SPACE KEY"; : COLOR e 
15250 КЕЅТОКЕ 15510: CGEN1 


15260 READ DX,DY,HOU: IFHOU-OTHENHOU-1:RE | — _ 


STORE 15510 
15270 LOCATEDX,DY:PRINT DC$(HOU); 


15280 GOSUB 2000:ІҒ HOU>1 THEN PLAY"V160 | ` 


2C7" ELSE WAITZ 2 
15290 WAIT2:KK-STRIG(9) : IFKK--1THEN КЕТИ | 
RN 

15200 LOCATEDX,DY:PRINT"  "«CS$«"  ":GOT 
015260 

15510 DATA 51,12,1,51,10,2,51,8,2,52,8,2 
.55,8,5,55,10 14,55, 12,4 4535,12,5, 51, 12 45, 
51,14,4,51,16,4,29,16,5,27,16,5,27,14,2, 
27,12, 2, 29,12,3, ай» 12,3,531, 12,0 

16000 SOUN 

16010 SOUND 0, SQ: SOUND 1,0: SOUND 2,20:50 
UND 3,@: SOUND 4,30:S0UND 5,0:S0UND 6,10: 
SOUND 7 ,&H37: SOUND 8, 16: SOUND 11 മം SOUND 
12, 10: RETURN 


15210 LOCATE2, 21: PRINT" ~ s STRINGS (23,"—" poo 
ашы a irt 


僕 は いつ も の よう に , 東向 き の 窓 に 面 し 
た 机 で 外注 の 原稿 を 書い て いた . 気が付く 
と 午前 3 時 。、「 そ ろ そ ろ 寝 な くち ゃ ……」. 
そう 思い な が ら 押 し 入れ の 扉 を 開け る . 5. 
と 気が付く と, 窓 の 外 が 騒が し い . よく 聴 
いて みる と , ボツ に し た だ の , いい 加減 に 
答え た だ の , 身 に 憶え の ある 台詞 .「 ま さ 
か 」. 僕 は 反射 的 に 窓 を 開け た . DEES 

や は り 昔 , 見 た こと の ある ハガキ の 大 軍 
が 僕 を 目 が け て 覆い か ぶさ っ て きた の だ . 
「 ウ ァ ー ノ 」… ガ バッ と 起き る . 夢 だ っ た の 
ട്‌. よく ある パタ ー ン だ . デジ タル の 目覚 
まし 時 計 が パタ リ と 変わ る . 午前 4 時 10 分 
e 何 の 気 な し に 窓 を 開け る . 雪が し ん し 
At, 絶え 間 な く 降 り 注い で いる . 遠く に 
降り 注い で いる 雪 の 粉 が 一 瞬 , 舞い 散る ハ 
ガキ に 見 えた . 

と いう わけ で , 今月 も マイ コン 人 生 ・ 相 
談 室 の ペー ジ が や っ て まい り ま し た (上 記 
の スト ー リ ー は , 去年 の 実話 に 基く フィ ク 
мам? ? ? ). 早い も の で , 僕 が この 
ペー ジ を 担当 し て 約 1 年 が 経っ て し まっ た 
ん で すね . 

まぁ , な に は と も あれ まず は お 便り か ら . 


真面目 な 買 問 の コー 


7/2. ん ey <A. 
NRA 
(TIAA: ЖЕ TA 
P5 ШАЛ 


жы: 


手紙 の 中 に 10 月 号 の 村上 君 の 質問 の 例 に 
つい て 書か れ て いる の で , 僕 (た ち ) の 方 
で も それ を 例 に と っ て 書き まし ょ う . 
š+, その 号 採 用 の 質問 が まとまっ だ と 
き , 自分 ひと り で 答え られ な い 質 問 (た と 
えば , 自分 が わか ら な い マ シン に つい て の 
"mm iu, 必ず エン ジン ・ ル ー ム の 人 た だ た ちや 
PiO 編 集 部 の 人 だ ちと 話し 合っ だ うえ で の 
適切 な 解答 を 打ち 出し て いる の で す . 10 月 


号 の 村上 君 の 質問 に 関し て も 例外 で は あり 


ませ ん . 僕 に し て も エン ジン ・ ル ー ム の 人 
だ ち に し て も 。 誰 も が みん な , 受験 と いう 
も の を 経験 し て き て いる の で す . いろ いろ 
な 意見 が 出 ま し た .「 マ イコ ユン に 没頭 し 過ぎ 
て 受験 を 失敗 すれ ば , 初め て わか る だ ろ 


う 」 b» ТЕРЕ СӘН, マイ コ 


ン な ん て 触 わ る 時 間 も な い は ず 」 な どの 意 
見 も 出 ま し た . 

inl b 受験 勉強 を する に あたっ て の ネッ ク 
は , マイ コン に 限っ だ こと で は あり ませ ん . 
僕 が 高校 受験 を 控え を て いる ころ は BCL 
(Broad Casting Listeners = 放送 受信 者 ) 
の プー ム で , けじめ を つけ る の に 悩ん で い 
だ こと が あり まし だ 。 ちょ うと 村上 君 と 同 
じ 心 境 だ どっ だ か も しれ ま せん . 真夜 の 深夜 , 
Ьо ЪФ) ЗІМ Кс УЕ 
チュ ー ニ ング を 合わ せ , 全 神 経 を ラジ オ の 
REN SCHELL TUT LPG 
それ も 秋 で 終わ り . 受信 局 数 が 目標 に 達し 
ROT, そこ で お し まい . それ か ら の 数 箇 
月 は 塾 通 いで , 3 月 に は 晴れ て 希望 の 高校 
に 合格 とい う 当 た り 前 の こと を 成 し と げ ま 
LR. これ は 僕 の 場合 で すけ ど …. 

өзе РФ ССТ Тж» 
ク ・ フ ァ ン に し て も , 自分 が 夢中 に な っ て 
いる も の が ある 方 に と っ て は , 誰 も が 同じ 
悩み を 持っ て いる は ず で す . 

ilc, 受験 勉強 の 期間 ど だ け マ イコ ン を し 
まう の は お か し い , と いう 意見 も あり まし 
г, 特に 理系 の 大 学 に 進ん だ 場合 . 受験 勉 
強 に も 増し て 忙し て な り ま す . レポ ボー ト な 
ん か 凄い 量 で す ょ よ . 友人 に も 何人 か いま し 


раз. 証言 1 : 「 週 に 2 回 は レポ ー ト で 
徹夜 ど ね 」( 理 工学 部 ・ 金 属 工学 専攻 ). 証言 
2 :「 大 学 入 っ て の 2 年 間 は マイ コン な ん 
て いじ る 暇 な か っ だ よ 」( 理 工学 部 ・ 電 気 工 
ни), また , 大 学 に 入っ だ から と いっ て 
安心 し て マイ コン に 没頭 し , 単位 を 落と し 
て し まっ た だ と いう 可哀そう な 人 も いま し だ . 
な に は と も あれ , い つ で も ゲ ジ メ な るい ( ち 


と 古い か) と いう こと で すね . 


xm 


pbs ザ っ で が も だ な に 7 ペダ ネー 


ム : 森沢 優 だ どっ て ? 


pc, すみ ませ ん . 実は を の と お り で す . 
Tb, バー ジョ ン が 3 つ あ る の は 確か な よ 
57. バー ジョ ン の 違い に よっ て と どう の 
こう の と まで は 具体 的 に 調べ て お り ま せん . 
実際 の と ころ , ロッ ク を 掛け る た め の ズ パ 
スワ ー ド で すか ら , 情報 (プロ グラ ム な ど ) 
保護 の た め に , 極端 に 言う と パス ワー ド の 
外し 方 な ど は , 明か ら る ま に す る 必要 も な 
いと 思い ます 。 


あッ 

UGE KR XEBERA“ 
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名 古屋 YANMO 


それ で は , ここ で 素朴 な 質問 を 紹介 きせ 
で いた だ さき ます 。 この 質問 の 差し 出し 人 は , 
東京 都 に お 住ま い の 加藤 君 . 


だ る さい. 
素朴 な 質問 を も う 1 つ . 今度 は ペン ネー 
ム : ケ ン シ ロ ウ か ら の ハガキ を . 


レイ ) の 他 に フロ ッ ピ ー デ ィ ク ス ま た だ は デ 
ー タ ・ レ コー ダ が 最低 限 必要 で す . これ か ら 
の こと を 考え る と 。 ソ フト は フロ ッ ピ ー デ 
ィ ス ク で 供給 きれ る こと が 多く な る の で , 

両方 と も 揃え て いた 方 が いい で し ょ う . = 
ニタ は , ゲー ム 目 的 で し だ ら も ちろ ん カラ 
ー の 中 ・ 高 解像度 の 方 が いい で すね . た だ 
し 。 あ な だ が フラ ファミ リー コン シン ピュー や SC 
-3000 の よう な ゲー ム ・ コ ンピュータ を 考え 
て いる の で し た だ たら, 一 般 の 家庭 用 カラ ー テ 
レビ で も いい と 思い ます . この 場合 だ と, 

フロ ッッ ピー ディ スク は それ ほど 必要 で は あ 
り ま せん ね . ゲー ム ・ カ ー ト リッ ジ も 。 か 
な り 面 白 に も の が 出 て いま すし ね . 特に フ 
アァ ミリ ー コ ンピュータ は 人 気 が あ り 。 か つ 。 
店 頭 で は どん どん 値引き し て ます の で , 7 
ー ム を する に は も っ て こい の 機種 だ と 思い 
i... 


次 の 質問 は 兵庫 県 の 宮崎 君 か ら 6 


p まず , 表 1 を 見 て くだ さい . 16 進 法 で 0 H~ 
F 是 (数 字 の 後 の ^H” は 10 進 法 と 区 別 す る た 
め に 付け て いま す ) を 10 進 法 の 数 と 対応 き 
せ て あり ます . この くら い の 変 換 な ら 指 を 
っ も 数え て: も で [さき る て し よう 。 

$c, 桁 数 が 多く な っ て きだ た ら こ う は い 
SATA. そこ で , 一 般 的 に は 次 の よう な 


方 法 を 使っ て いま す . 


表 2 を 見 て も ら え れ ば わか る と 思い ます 
മ, と に か く 〈 商 が 0 に な る まで どん どん 16 
で 割っ て いき , その 時 々 の 余り を 並べ て い 
け ば いい わけ で す . そし て 10 以 上 の 数 を A 
— F に 変換 すれ ば 10 進 法 一 16 進 法 変換 の 出 
来 上 が り で す . 

BASIC で は HEX$ を 使え ば 簡単 に 10 進 
法 つ 16 進 法 変換 が 出来 ます . ここ で , 参考 
まで に HEX$ を 使わ な いで , 変換 する プロ 
グラ ム を 紹介 し ます . 

プロ グラ ム 中 で 変数 C に 層 H30 や 7 を 足 


し て いる と ころ が わか り に くい と 思い ます . 


この 意味 が わか ら な い 人 は キャ ラク タ ・ コ 
ー ド 表 を じ ー と な が め て みて くだ さき さい. を 
うす れ ば きっ と わか る と 思い ます . 


広島 県 す て い ん ぐ 


Forever P.C.G. 


ダー ム と いえ ば , ЕлОСсОЖ, S3 
ン に 640X200 ド ッ ト の グラ フィ ッ ク が な か 
っ だ ころ の お ぢ お 話 で す が , ゲー ム の 雰囲気 を 
盛り 9 上げる だ た め に , キャ ラク タ を 自由 に 定 
義 す る PCG( プ ログ ラマ ブル ・ キ ャ ラク 
タ ・ ジ ェ ネ レー タ ) と いう の が 爆発 的 な AA 
EU Са, その 入 気 は 。 WENE 
өкі FT Th, BET 3 NE EE は 


表 1 10 進 ご 16 進 変換 表 


表 2 10 進 法 で 2603 を 16 進 法 に 変換 する 方 法 


16) 2603 


162... 


2603 を 16 で 割る と 商 が 162 で 余り が 11. 


(8) 


16)2603 
Iv E TATE 
16) Т 05:74 

^ RR 


10 


さら に 10 を 16 で 割る と 商 が 0 — U 5010. 


商 が 0 に な っ た の で これ で 終わ り . 


16 (2603 
16 ) 162 


さら に 162 を 16 で 割る と 商 が 10 で 余り が 
2% 


(4) 


祭り を それ ぞ れ 表 1 を みて 16 進 法 に する 
C, A2 日 と な る . つま り 2603 は 16 進 法 で 
A 2 BH. 


"PLANET TIZER” の 発表 も た び 重 な っ 
て か , この 相談 室 に も だ くさ ん の 質問 が 寄 
せら れ て きま し だ 。 その 中 の 1 和信, жің 
し 人 は 北海 道 の 深川 君 . 


p. PC-8001 + PCG-8100 СЕ 2 > 7 F は , 
PC -8801 + PCG-8800 C も PC-8001mk II 
+ PCG*8200 E 023. 走ら せる 前 
に は N-BASIC じ モー ド に し て , PCG を ON に 
し て か ら 使 っ て くだ きい . 

な お, PCG-8100 は PC-8801 に その まま で 
は 付け る こと が で きま せん (や ろう と 思え ぇ 
ば … ? ). 

これ と 似 だ よう な 質問 は , 他 の 88 ユ ー ザ 
ー の 方 か ら も た くる ん いた だ きま し た . X 
する に , PC-8001 十 PCG-8100 の ブログ ラム 
は コピ ー 機 能 を 使わ な いも の な ら , PC-88 
01†+PCG-8800 で は 100 動 く と いう こと で 
y 35 

また だ, 音 出し の 方 は と いう と , 初期 設定 が 
13€ 5 DT, PCG-8800 で は 最初 に 音 が 出 な 
いこ と が ある よう で す が , 初期 設定 時 に 
OUT 15, 54 を 実行 すれ ば 音 が 出る そう で す 
(PCG-8100 の 3 ボイス の バー ジョ ン も 同様 )、 

Жы, この 解答 を 書く に あたっ て いろ い 
ろ と て いね い に 説 明 し て くだ さっ だ た だ 幌 
HAL 研究 所 の 方 に 心から お 礼 申 し あげ ま 
+. 

いま か ら 4 年 以上 も まえ ぇ , ФОРЕТ- 
CBM で 描い て いた 精密 な 日 本 地図 迫力 あ 
る サウ ンド …. 僕たち は 感動 の あま り , 5 
を 押 き え ず に は いら れ ま せん で し た 。 を 
れ か ら ず っ と 。 現在 で も PCG は ホビ ー ス 
ト の 間 で も ずっ と 親しま れ 続 け て いま す . 
フル ・ グ ラフ ィ ッ ク で は 難し い 高 速 移動 が , 
いと も 簡単 に どき る の で すか ら ね . (ЖО 
シン は MZ-80C。 PCG を 充分 に 活用 し て ス 
ター ダス ト ・ ナ イト で も 作り ます か , ちょ 
うど クリ スマ ス の 時 期 で すし . 

と も あれ , 皆さん も 幸せ な クリ スマ ス ・ 
ATE, САВ, また 来年 を よろ じ て く 

10 進 法 一 16 進 法 変 換 プ ログ ラム 
INPUT "19 シッ ホウ ノ hz "505 ` 
D$z"" 

B=INT (A/16) 
C= (А-Вжі2) 410 
IF ൧159 THEN C=C+7 
D$zCHR$ (С) +D$ 
A=B 
IF В<>9 THEN 120 


РКІМТ D$ 
GOTO 10% 


181 


レス を 16 進 4 桁 で 入力 し , プリ ンタ に 出力 
する 場合 に は Y を 押し て くだ る さい. ダン プ ・ 


リス ト 表 示 中 に [SHIFT] + [BREAK] C7 E 


を 入力 する と , メッ セー ジ を 出し て 再 入力 
を 要求 し て きま す . 
転送 先 デ ドレ ス を 指定 時 に キー の み 


ス の 入力 に 。 b 5 一度 [SHIFT] + [BREAK] を 入力 する と , チェ ッ ク ・ サ ム モ ー ド に な 
で モニ タ へ 飛び ます 。 画面 の み の 出力 で は b š+. シャ ー プ BASIC の モニ タ の D ュ マ 


256 バイ ト 出 力 ご と に 一 時 停止 する の で 何 
か キー を 押し て くだ さい. 

な お 。 モニ タ を 正常 に ホッ ト ・ ス ター ト 
る せる だ ため に , dB-BASIC で 使う と き は 
ЕІҒОН : 52H—50H, FIFCH : 10H—00H 
の よう に 変更 し て くだ さい. 

プロ グラ ム ・ エ リア : 100013 ~ 1281, 


ンド と 同様 に アデ ドレ ス を 入力 し て くだ さい. 
プリ ンタ を 使わ な い 場 合 ,256 バ イト 出力 ご 
と に 一 時 停止 する の で , , 何 か キー を 押し て 
CILE. 
プロ グラ ム ・ エ リア : C000H—C2BFH, 
START C000H (転送 後 は を の 先頭 ) 
転送 不能 エリ ア : 00001 - 12911 (SHA 


スタ ッ ク お よび ワー ク ・ エ リア F2C9H ~F 


30911, 実行 アド レス F000H (転送 後 は を の 
先頭 ). 


М2-ВОВ&20008 


この プログ ラム は , SHARP BASIC, 
WICS 共 用 で す . 

実行 きせ る と 転送 先 ア ドレ ス を 聞い て き 
iT. 転送 し た い 場 合 は アデ ドレ ス を 16 進 4 


RP Monitor), 0000H — 14ЕЕН (WICS 
Monitor), 10411 —FFFFH, 転送 前 と 転 
送 後 が 重なる 場合 

注 1 : アド レス 入力 時 に |BREAK| キー 入力 
で モニ ター コー ルド スタ タート: 

注 2 : チェ ッ ク ・ サ ム 表 示 中 、 [BREAK] + 
ーー 入力 で チェ ッ ク ・ サ ム の アド レス 入力 待 
ち に 戻る . 

注 3 : 021, C030H の 2 バイ ト を ワー ク ・ 


X1 用 チェ ッ ク ・ サ ム 


シス テム に 依存 せ ず , リロ ケー タブ ル な 
チェ ッ ク サ ム ・ ブ ログ ラム で す (RIL, 
0018H, 0019H と 重 な ら な いよ うに し て 〈《 だ 
Av. 通常 は モニ タ を 破壊 し な いよ うに 18 
00H 以 降 に 置く の が よい と 思い ます ). 桁 で 転送 し た く な い 場 合 は [CR| キー の み を エリ ア に 使っ て いる の で 自分 自身 の チェ ッ 

使い 方 は S(tart) ア デ ド レス, E(nd) アド 入力 し て くだ きい . 転送 で き な い アド レス ク ・ サ ム を と る に は 注意 が 必要 . 
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と! は の റെ 78 E4 48 20 ҒА 05 00 F1 ED 79 C1 С? CS 81 01 :SF C180 2B OO DF D3 OO 3C 10 F4 DF El OO 20 3A 55 75 6D :6C 
Е:90 1A ED 78 Eé 28 20 ға 95 0р ED 78 Сі C? ОҒ А2 a8 :21 C190 OO DF 05 o1 7C DF B7 OO 7D DF BZ OO 1E OO 06 10 :3A 
ഒര 7C DF 97 Өй DF 83 20 20 41 44 52 2E 24 48 00 DF :03 C1AO DF D8 OO 7E DF A8 OO 83 SF 22 10 F4 DF BD OO 20 581 
F1E i4 ай AT QF ӨС AF 47 DF ØC 80 B4 67 ОС 07 Яй SF :12 CiBO ZA OO DF 9A OO DF El OO Ор 20 DQ 06 29 ЗЕ 2D DF :02 
൦0 OF 43 98 C? ОҒ 05 00 OF ЗЕ 00 С? DF 74 FF FE ӨЗ :CB С1СО BB OO 10 FB DF D2 OO DF А2 OO 55 75 6D 20 OO C1 :OE 
F100 29 18 FE 30 38 F5 FE 3A 30 83 Dé 30 С? ES DF FE :°8 С100 EZ АҒ 11 10 OO ES CS FS АҒ ദം 19 OD 20 FB АҒ DF :F6 
F・ と 41 38 ЕЯ FE 47 38 E4 Dé 37 С? ЗЕ E4 ОҒ SE FF ЗЕ :5С C1EO 99 00 79 DF 69 OO F1 81 СІ El 23 10 ЕЗ DF 7C OO 554 
ZiF@ 52 ОЕ 89 СЕ DD F? Е1 22 18 00 C3 ӨЗ 10 FS ӨР ОҒ :93 CiFO 20 ТА OO DF 59 OO D1 DF Е ОО FD 7E 20 B7 СО DF :E2 
Sum ЕБ S? 04 28 B? AS 29 39 C8 ടെ 7B 09 B4 85 8B 22 :97 Sum SB 01 DO 06 B5 6F 45 22 9E 1E 25 E? ӨС FB АС 40 :4А 
әсе +t +1 2 +3 +4 +S +4 +7 +Š +9 +A +B +C +D +E +F Sum Add +O +1 +2 +3 +4 +5 +6 +7 +8 +9 +A +B +C +D +E +F :Sum 
c289 AF ӘС DF 43 88 Fi ES る F DF 50 FF FE 03 28 Qé FD :A4 C200 АҒ OO 30 05 EF ОА C9 CD 22 ОВ B7 CO 18 F? DF ӨС :7Е 
r2:0 77 13 27 QE FE 70 Eé OF 87 27 FE 18 OE СЕ DF 1А :99 C210 OO DF 58 OO 2D 41 44 52 2E 24 OO DF 93 00 01 O7 :07 
тора 46 7D Ei C? FD 36 10 00 ES FS 7E 23 87 28 05 DF :А6 C220 OO 38 11 11 92 10 CD A4 06 1A FE OB 28 18 EB 09 :CB 
2230 09 00 18 Fé Fi ES C9 ЗЕ 28 09 ED 79 03 09 18 1А SF C230 EB C3 14 06 11 80 12 EF OO 1A FE 1B 28 O8 ЕВ O9 BZ 
F249 ES CS 21 5й 09 ЕО 46 12 ҒО 4E 11 9? 4D 44 ОҒ SF A 240 ЕВ 05 EF 1B Di C? DD F? E1 22 19 OO C7 FS ОҒ OF :30 
КІЙ йй Сі E1 ЗЕ 90 DF 84 00 ЗЕ OA FD CB 10 GE DO CS :93 C250 OF OF DF ОЗ OO F1 F5 Ев ОҒ Fé 30 FE За 38 O2 Có :59 
трей 05 ES FS 14 pA 21 QA 80 41 61 1A ED 78 ES 08 28 :87 C260 07 DF 19 OO F1 С? FD 56 50 OO ЕЗ FS 7E 23 B7 28 :74 
-570 i7? 28 7D B4 20 F5 15 20 F2 09 CS 01 40 31 O9 DF :7F C270 05 DF 09 OO 18 Fé Fi E3 C9 ЗЕ 20 DF 33 OO FS 20 :2D 
Fran сс ас so 5а 20 45 72 2E 00 09 Сі D? F1 18 OD 『 ど 1 C280 O9 EF 01 EF Ор 28 OD Fl 18 14 CD Có OB CD 52 OB :Е9 

эой кї 0D co 79 ӨС ӘЗ 16 ӨС ED 51 14 ED 51 EI O1 C1 :9С C290 FE OB 20 ЕЗ DF 74 FE ЗЕ OD DF E1 FF ЗЕ OA FD CB :87 
қрай で の DZ AC 00 ЗЕ 20 ED 79 ӨЗ CB 58 28 F? С? ЕО 70 :FS C260 20 ОЕ DO CS 4F DF ЗЕ FE 79 DF 65 FE 79 Сі C? FD ЕВ 
7-290 ҮЗ FO 71 11 C5 OACI OP PP DPE EB SE 23 56 23. teB C2BO CB 2F OE C9 D9 El ES SE 23 56 25 ЕЗ 19 ES D9 C9 :ED 
race ЕЗ 19 ES 09 С? ¿E 50 59 3B 08 090.008 88 42 DF SF i55 || ーー ノー 
--------------------------.-.-..-..-.....-..-..-...-..........---.-.-.----- Sum A2 В2 9C A8 АЕ BO DB 25 10 DE 55 3D 85 E6 44 4B :61 
Әт 23 26 С6 ER S+ 02 SC 19 ES 79 7B 27 31 БВ АР FB :В1 


PC-6001/mkII 6601, Jr. 用 "84 年 11 月 号 "85 年 4 月 号 FM-7/8, LEVEL3, MZ-700-K/C 用 "84 年 12 月 号 "85 年 5 AS 
PC-8001/mkII /8801 用 "85 年 2 A$ "85 年 7 月 号 PASOPIA/FP-1100 用 "85 年 3 月 号 85 年 8 月 号 


チェ ッ ク ・ サ ム プ ログ ラム 掲載 号 , 掲載 予定 号 
ХІ, MZ-80B&2000 用 "85 年 1 月 号 "85 年 6 月 号 
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デー ビー ソフ ト , TSE ソ フト , コム パッ ク さ ん の ご 協力 に より の , 
抽選 で 15 名 の 読者 の 方 に 下記 の 各 製品 を プレ ゼン ト し ます . 


MSF 2 ИЙ 


官製 ハガキ に 右 下 の シー ル を 貼り , ӨтемӨөнке>ӨзткӨшші/ 
は 学年 希望 の ソフ トウ ェ ア 名 称 (下記 で 紹介 し た ソフ ト の 中 か ら 1 
つ だ け ) を ハッ キリ と 記入 し て , 1 月 5 日 (消印 有効 ) まで に PiO Z 
レ ゼ ント ・ コ ー ナ ー 宛 に 送っ て くだ さい . な お 。 当選 発表 は PiO 3 月 
号 で 行ない ます . 

3: : 応募 シー ル の 貼っ て な い ハ ガキ は 無効 に な り ま す . 


(9 に つい て は , カセ ッ ト ま た は フロ ッ ピ ー の どちら を 希望 する か は っ きり と 記入 し て 〈 だ さい . 


①VOLGUAHD 


(デー ビー ン ソフト) \4.500 
PC-8801/mk II( カ セッ ト 版 ) 

エネ ルギーFULL で 3 機 合体 ./ 高 機動 可 
変 戦闘 シス テム ・ ヴ ォ ル ガー ド の 半 絶 な 防 
衛 戦 . 次 々 と 襲い か か みる 敵 戦 闘 機 。 巨大 母 
ia O) 出現 一 一 

スリ ル と デア クシ ョ ン . 大 追 力 の 超 メ カシ 
sweー テ ィング ゲ ダーム у 


③ ザ ・ コ ッ ク ビ ピッ ト 
(コム バック) \4.800/ Y 5,800 
FM-7/NEW7( カ セッ ト 版 / デ ィ ス ク 版 ) 
造 か 遠く の 空港 に 向っ て 進路 を 修正 し な 
が ら 飛 行 し .。 や が て ディ スプ レイ いっ ぱい 
に 人 迫る 消 走 路 に 着陸 . 
飛行 機 の 運動 や 計器 の 設定 , 美しい 夜景 
も 航空 力学 と 現実 の デー タ で シミ ュ レ ー ト . 
カセ ッ ト 版 3 名 / デ ィ ス ク 版 2 名 


еРагапоіа-88 
(T&E ソフ ト ) Ұ4,000/ Y 6,800 
PC-8801/mkII( カ セッ ト 版 / デ ィ ス ク 版 ) 
PC-8801/mkII の 限界 と あな た の 頭脳 と 
反射 神経 の 限界 に 挑む . スー パー エキ セン 
トリ ッ ク ゲ ー ム それ が 。 >*> 2 4 788 
ゲ プク ショ ン ゲ ー ム の スピ ー ド と 追 力 に >\ 
ズル ゲー ム の 知 的 人 迫力 を 加え , REID RU 
が 覚醒 する . 
カセ ッ ト 版 2 名 / デ ィ ス ク 版 3 名 


PiO11 月 号 ブ プレ ゼン ト ・ ユ コー ナー に , 多数 の 方 々 より ご 応募 いた だ き 
あり が と う ご ざ いま し た だ . 抽選 の 結果 , 次 の 11 名 の 方 々 に ゲー ム ・ ン ソフ 
ト を 送ら せ て い だ だ きま す . 


【 当 選者 発表 】 


(Ж) 
⑯ 西部 の 成り の あがり! Qtr HH —7j © Breakfast 
熊本 県 熊本 市 元 山 義文 千葉 県 柏 市 赤地 正光 山形 県 西置賜 郡 新 田 弘 昭 
北海 道 凡 田 郡 ж 一 生 埼玉 県 入間 郡 ЕН i 大 阪 府 大 阪 市 松本 安政 
埼玉 県 上 尾 市 松本 裕幸 徳島 県 阿南 市 常松 孝 久 山口 県 下関 市 中 島 清彦 


神奈 川 県 川崎 市 渡辺 陽 司 
佐賀 県 佐賀 市 ÞES 


ж 商品 到着 まで 1, 2 週間 か か る 場合 が あり ます . あら か じ め ご 了承 くだ さい . 


BATTLE FIELD 60 p.91 Suffocation р.146 0-400т GAME р.162 
表 2 の 変数 表 に BUG が あり まし た. 正 し 本 廊 入 力 方 法 の 項 で プロ グラ ム の セージ BASICS (リス ト 2) の 行 番号 30 行 に お 
ç 14, 方 法 に 間違い が あり まし だ た だ. 以下 の 手順 に 。 いて , CALL &41Е0 L Ze > Cv 2 PTl2, 
VTE>UTE そっ て セー し て くだ さき さい. CALL &41D0 の 間違い で し た . 
HXL 一 HHX(… 配 列 変数 で す Ф5АУЕ “CASO: (F) SUF B” RETURN 
HYL-HY ( と し て BASIC et —7 UT 


HV>HU OSAVEM “CASO: (F) SUF М”, &HCB 
弾 が 上 下す る か … 弾 の 上 下す る カカ ОО, &HEEDF RETURN t L C z vi 
TLE. それ と プロ グラ ム 中 の 36017 t 22 Bee > U 37. 
70 行 は 削除 し て くだ さい . Мі, ゲー ム ・ ス ター ト 方 法 は LOAD, 


R RETURN | で 結構 で す . 


%%6 


ああ JR-200 キ ジョ イス ティ ッ ク 十 書籍 

# ¥26K വകക. МС. 

т 091 tig ВВР ЖЕТ 272 
ASG 高田 重 和 


dr — J.y 2 X (М5) + BASIC 16+ 
»— F U > Z22k2£*25KUA EC. まだ フ 
ァ ミ リー コン ピュ ー タ オー ゲー ム 3 本 を \6 
ー 71ന്‌, 
т 272 千葉 県 市 川 市 幅 谷 5-15-18 

£i ТЕ Bk 


ФРУ -1000+ 2 b Y > ЖЕКИ 
上 で (送料 込み ). МТТ. 
Ф 239 神奈 川 県 横須賀 市 桜が丘 2-3-9 


IAS $ 


Ф.РС-1501--СЕ-150--СЕ-157- Ж を 
¥70K. PC-6001 十 PC-6006 二 データ ・ レ コ 
— -FA*X50K, と も に と 送料 込み . WT 


Є. 
© 515 三重 県 松阪 市 中 町 1908 
伊藤 達郎 方 

塩崎 ін 


d$ SG-10004- 9 —h Y > 754+ ¥10~ 15K, 


т 701-45 岡山 県 邑久 郡 邑久 町 忠明 
4761-2 
松本 徳久 


Ф РС-1501+СЕ-150+СЕ-155+ 2 + 7 

-2-Жж%Ұ60--70К, W〒 で . 

320 栃木 県 宇都 宮 市 駒 生 町 3371-51 
八木 沢 修 


PC-1500+CE-155 十 CE-156 を Ұ4ЗК, 
с. 
© 330 大 宮 市 ニッ 宮 67-23 

大 槻 卓哉 


ФРУ-2000+ 2+ > F ° 4 ンタ ー フ ェ イ 
х 450014. РВ-110ғҰ5Қ, Et 6 t T 
Жы 
e 336 埼玉 県 浦和 市 栄和 789-1 

井川 清二 


d$ PC-6001mk II + PC-DR321- Z a 4 2 


7 4 y 2 ҒҰ65К, TEL を 書い て W〒 で . 


æ 325 栃 本 県 黒磯 市 筐 町 4-6 
Fr BP Е 


ФЕХ-700Р-- Ж e Y7K—. ҒА-3--ЕР-12 

を \15K 一 . FX-710P を 平 10K 一 . すべ て 

送料 込み . МТТ, 

т 181 東京 都 三鷹 市 大 沢 5-14-15 
北村 公 久 


d PC-8052 7 ¥40K (送料 込み ). Wr C. 


e» 236 神祭 川 県 横浜 市 金沢 区 六浦 町 
1090 
川合 伸二 


Ф.РС-1255--СЕ-124-- Ж を Y17K, PC- 

1501 +CE-157 + Ж 2 Y32K. 

a 332 埼玉 県 川 [1 市 朝日 6-14-15 
157൭ 


ФРВ-100--ОК-1--ҒА-3- k £ ЖОК, W 

Hc. 

т 206 東京 都 多摩 市 具 取 4-4-6-206 
伊藤 秀憲 


ФРС-1251- Ж ғ YI15K ~ (ЖАА), W 
Ж. 
т 302 英 城 県 取手 市 新町 4-10-9 

中 村 健 太郎 


#PC-8001mk II を \50K. WFT. 
т 181 . 東 京都 三鷹 市 新川 6-6-16 根 岸 ハ 
ウス 102 

瀬尾 和美 
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ФРС-1501-- 本 7 2 Y39.8K, また だ PC- 

1350 十 半 25K と の 交換 可 . WTT. 

m354 埼玉 県 富士見 市 鶴瀬 東 2-3-12 
唱 山 貴之 


d$ PC-6001mk II + ж + Ж50К ~. 
709-37 岡山 県 久米 郡中 央 町 原田 
1184 

三森 浩之 


ФРВ-700--ОК-4-- 4:31 Y20K, WT 
Ж» 

ത 965 福島 県 会津 若松 市 南 花畑 7-6 
鈴木 幸三 


あ SC-3000 士 BASICIIIA キ カー トリ ッ ジ 
+ ¥25K. 
Ф 847 佐賀 県 唐津 市 町 田 2-3-16 

i p — BD 


ФСЕ-151ғҰ4--5К, WFT. 
am 431-12 静岡 県 浜松 市 庄 和 町 1824 
石塚 英俊 


&СЕ-126Р ¥ Y99K, 
т 910 福井 市 松本 1-55-5 302% 
広瀬 道人 


ФМ27-80С-- ЖІН->ҰЗОК, 
т 660 兵庫 県 尼崎 市 西本 町 7-267 
藤 井 晴 樹 


Ф MZ-731+ n — мж. 

Y70K, W〒 で . 

673 兵庫 県 明石 市 松が丘 5-1-1-47 
橋本 公 作 


ペー ラッ パー2 本 を 


まま PC-8001mkII + デー タ ・ レ コー ダ 二 本 

を \70K。 TEL を 書い て 〒 で . 

т 120 東京 都 足立 区 千住 仲町 3-1-501 
泉 孝典 


あー シッ クマ スタ ーJr. 士 カラー アダ 


プ タ 二 TV 接続 ケー ブル 十 本 を ぎ 27 代 一 . 


WET, (家庭 用 TV 接続 ケー ブル (RF コ 
ン バ ー タ ) を 希望 の 場合 . RF 希望 と 書い 


13). 
т. 939-01 富山 県 西夏 波 郡 福岡 町 中 島 
HT 

梶 沢 裕志 


ФРС-1251--СЕ-124-а ғ ~ Y15K. 
т 952-13 新潟 県 佐渡 郡 河原 田 本 町 92 
石塚 春海 方 

田中 秀和 


ФРС-1251+СЕ-125+ ЖЗ + + Y30K 
~. WFT. 

© 065 北海 道 札幌 市 東 区 北 14 条 東 10」 
日 杉山 マン ショ ン 


мн. 


ФЕР-І0ІІРІ,--ЕР-1085РЕС を Y10K, 

PB-700-- OR-4 (348) + FA-4* Y20K, Ж 

り に 来 ら れる 方 に . 

т 582 大 阪 府 柏原 市 本 郷 1-1-30 
染 田 健治 


&$M5+BASIC-G+ k+ 2 — F ? > Z # 
ҰЗ5К, な る で く 〈 く 近県 の 方 と W〒 で . 
879-26 大 分 県 南海 部 郡上 浦 町 津 井 
2067 

森崎 義彦 


ФРС-8201--РС-8206 е Y70—80K, WT 
©. 
т 065 北海 道 札幌 市 東 区 北 20 条 東 91 
目 TE E EL 

佐々 本 剛 寿 


Ф5С-3000+ BASIC+ %— b Yvy TÆ 
?Y25K, МТТ. 
т 300-12 J bk WL RE BAS Ey AJ # Ж 
1022-3 

中 根 勝 


&$MZ-80K (48KB) ¥40K. WT C. 
т 182 東京 都 調布 市 上 石原 3-14-42 
佐藤 du 


ФМАХ т и — х + š = BASIC+ ゲー 
as # — F Y > +PB-100+OR-1+ is 
も し ろ ゲ ー ム の 本 ② を ぎ 10K. バラ の と 
き は 各 \5K. МТТ. 
a 316 茨城 県 日 立 市 中 丸町 1-24-2 

千葉 秀樹 


あ PC-8001mkII 用 ジョ イス ティ ッ ク を 


Y3K, $ 4 IS TEL (P.M.7:00—9 : 00) C. 


т 158 東京 都 世田谷 区 興 沢 6-24-14 
田村 義 民 会 (03) 701-8653 


Ф.РС-1500--СЕ-150-- 4 を Y40K, PC- 
1255 Ұ15К, PC-1245* Y5K, РС-1401 


30016 すべて 送料 込み . ま ず は W〒 て . 


т 631 奈良 市 山陵 町 2070-1-326 
大 田中 秀一 


ക РС-1500--СЕ-150--СЕ-155--СЕ-156 

# ¥25~30KT. 

т 114 東京 都 北 区 十条 仲原 3-19-7 
ІКІНЖ Z 


d777MP.1007*Y60K, МТТ. 
a 340 草加 市 水川 町 1148 
青木 英夫 


ФРВ-700 + Y15K, PC-1501 と の 変換 പ്പ്‌, 


交換 の と き に は 十 « し ます . W〒 で . 
e» 424 静岡 県 清水 市 草 苑 1938-1 
қаз FL 


ФРС-1245 £ Ұ5К, РС-1350% ¥25K. CE- 
124% Ұ2.5К, МТТ. 
т 192 東京 都 和 上 了 市 片倉 町 540 

î PHI 


%І/О"834:2, 6] 211012, [7] を まとめ て 
Y25K. バラ も 可 。 TT. 
電 606 京都 市 左京 区 下鴨 西高 本 町 49 
高 本 荘 . 

小泉 M 


ФРі0 1 一 16| を 各 一 \0.5K. 
922-07 山形 県 西置賜 郡 白鷹 町 鮎 具 
1038 

Fr HH SL HA 


Ф1/0'82 1, 5, 7 H Z $& Y0.8K (送料 込 

^). 

т 475 愛知 県 半田 市 岩 消 高 山 町 4-10 
池田 夏樹 


ФРІО1. 3, 
© 238 神奈 川 県 横 須 加 市 汐見 台 1-5- 


5 月 号 を まとめ て \1.5K。, 


508 
新倉 Hë 


€PiO1, 2, 3, 41 90.6൭. W 

〒 で 。 手渡 し 希望. 

e» 707 岡山 県 英田 郡 美作 町 格 原 中 491 
倉内 正浩 


PiO7 月 号 を \0.5K. МТС, 
ത 229 神奈 川 県 相模 原市 横山 4-11-9-2 
鈴木 淳雄 


൭2101, (2), [3] を \2K. 
т 029-45 岩手 県 胆沢 郡 金ヶ崎 町 本 町 9 
АЦ Жа 


Ф РСС-8100 (NEW) を Ұ15--20К (送料 

込み ). 

© 185 東京 都 国分 寺 市 日 吉 町 1-12-11 
Fr HEIR JC 


97 F a 2 #IPC-6001H] 2 4 F < X е 

ҰЗК (送料 込み ). 

т 061-24 札幌 市 西区 前 田 4 条 10-10-18 
村松 fl 


PC-6001 用 EXAS コ ン パ イラ e Y3K, 


WFT. 
e» 274 千草 県 船橋 市 習志野 台 7-12.5- 
506 


清原 純 哉 


ФРС-6001, EXAS コ ユ コンパ イラ , ジョ イス 

ティ ッ ク を 安価 で . МТТ. 

© 755 山口 県 字 部 市 西本 町 1-4-8 
清水 W 


ФРСС-700% Y12—15K, W〒 て . 
т 959-26 新潟 県 北蒲原 郡中 条 町 星 の 
宮 10-10 

井上 浩一 


Ф PC-6001FHEXAS2 x 2. >Ұ45К,Т 
Ж; 
т 920-21 石川 県 石川 郡 鈴 来 町 深瀬 新 
8192 

竹田 2) 


%СЕ-124% Ұ2.5-3КС, W〒 で . 手渡 し 

希望 . 

т 236 横浜 市 金沢 区 東 朝 比奈 1-14-26 
谷原 信隆 


€ PC-1500 用 の 4K RAM, 2 + 7 – 7, 

カセ モッ トイ ンタ ー フ ェ イ ス を 安価 で . 

ത 369-01 埼玉 県 吹上 町 下 忍 3479-3 
浪岡 f 


%ФҒЕА-3ғҰЗК, Wr. 
т 322 栃木 県 鹿沼 市 見 野 7-6 
大 和 島 一 伸 


%СЕ-124ҰҰЗК, また だ, 他 の カセ モッ ト ・ 

イン ター フェ イス , プリ ンタ を 安価 で . 

HEUT. 

т 648 和歌 山県 橋本 市 隅田 町 河瀬 113 
KY Al tk 


€77i/—2vVCa—Z*X5K. カー 

КУ v7 еЖІК, TEL OTT, WT 

T 

© 112 東京 都 文京 区 千石 2-11-4-203 
竹内 $£ 


Ф М27-8ВК-- MZ-8BGK を Y25K, TT. 
æ 509-25 岐阜 県 益田 郡 萩 原町 宮田 
1415 

А 


€ PCG-8100 (NEW) を Y10—15K, WT 
p еМ 
т 577 大 阪 府 東大 阪 市 小 若江 4-3-7 

上 谷 健二 


Ф PC-8001mkII 用 の ジョ イス ティ ッ ク 
£#*Y4K. メー カー と 定価 を 書い て W〒〒 


PIOBAZAAR 


C. まだ PiO7 月 号 € Y0.5K, 
© 870-11 大 分 県 大 分 市 田尻 463-1 
安東 孝治 


@ 2? 7 š) =a y za — Z ҒҰ4--55К, 


カー トリ ッ ジ は 1 本 に つき 侍 1K. WFT. 


Ф 318 
303 
松井 規 明 


茨城 県 高萩 市 高浜 町 3-98-2 4- 


€ PCG-8200 を —Y9K (送料 込み ). WT 

%. 

അ 096 北海 道 名 寄 市 栄町 15 番 地 4-406 
平井 Në 


%ФРС-6006 2 Y6K, TT. 
© 359 埼玉 県 所 沢 市 東 狭山 ヶ 丘 1-658- 
38 

増本 寛之 


© PC-6001mk II 用 EXAS コ ン パ イラ を 
ҰЗК, 
അ 787 高知 県 中 村 市 小姓 町 35 

清水 純 


@FM-7+ 2 5 —CRT+ > — z + 

x 43090251. МТС. 

© 452 愛知 県 名 古屋 市 西区 比良 4-201 
名 日 雅雄 


レコ ーー 


|@ 2? vy š) —a y a — Z HSK. 
© 649-15 和歌 山県 日 高 郡 印南 町 大 字 
印南 原 756 

黒井 信吾 


€ PC-6031 + —X40K, TT, 
© 794.25 愛媛 県 越智 郡 生 名 村 丸 山 2 区 
金沢 哲治 


ФРС-6006 + Y4—6K. WFT. 
© 496 愛知 県 津島 市 柳原 町 1-45 
合 木 総一郎 


ФРС-6006-- ж + TSK. WTT. 
© 583 大 阪 府 藤井 寺 市 物 社 1-11-22 
成川 秀隆 


¢DFA-3# ¥2KT. ②PB-100 の RAM>* 
y 2 ല്‌, ①+② を 3.5K. ЖЖБА 
^. а (2770. 
© 347 埼玉 県 加須 市 大 字 下 谷 979 

大 久保 明 


を PC-1500 の 周辺 機器 (その 他 本 も) を 安 
価 ( 必 ず ) で . W〒 で . 
© 381.22 長野 市 稲里 町 田 牧 115 

田中 聡明 


を FM-7 用 ジョ イス ティ ッ ク (8 方 向 ) モ ン 
ター スト ッ プ (で きれ ば ) プ レー ク ・ キ ー 
好 応 (で きれ ば ) 全 5 人 KK 以下 で . 


© 518-04 三重 県 名 張 市 蔵 持 町 原 出 
1339 
山岡 康彦 


$ PC-6006 を ま 5K で . まな た, PB-100+ 4 
を 5~ー7K で 売り ます . WFT. 

© 794 愛媛 県 今治 市 松本 町 4-3-3 
近藤 哲史 


ФРСС-8100%Ұ10К, 
© 029-05 岩手 県 東磐井 郡 大 東町 摺 沢 
字 街 道 下 25-2 

佐藤 進 


Ф PC-6006 + ¥3~5K, PCG-8100(NEW ) 


01൦. PC-1245 2 YOK C76 D + T. 


"3 3 
© 483 愛知 県 江南 市 古 知 野 町 広見 23 
Di 1:4: 


$€PCG-8100(NEW) を \15K. FT. 
© 472 愛知 県 知立 市 西町 落合 41-5 
須原 誠司 


PCG-8100 (NEW) を \15K. PiO7 月 号 
#*04K. TT. 
അ 840-02 佐賀 県 佐賀 郡 大 和 町 尼寺 東 
8113 

八田 治郎 


1/O'82 年 5 月 号 を 半 0.8K( 送 料 込み ). W 

ҒАТ. : 

© 798 愛媛 県 宇和 島 市 御幸 町 2-2-21 
森岡 伸夫 


を デジ ッ ク 社 LP-83 (MZ-2200 HD を 

Ұ10К, WFT. 

© 636 奈良 県 生駒 郡 平群 町 吉 新 2-2-7 
RERIT 


¢ PC-8801mk II 用 内 蔵 フ ロッ ピー ディ 
スク ドラ イブ を 30K 十 PC-1211 で . 
© 801 北九州 市 門司 区 清滝 3-6-21 

大 神 裕二 


% PC-8001mk II 用 PCG-8200 を Ұ10- 


15K, PC-KD351 % Y50—60K, W〒 で . 


© 861-44 熊本 県 下益城 郡中 央 町 西山 
1162-1 
西 坂 義一 


© PC-1261 2 Y12—13K, CE-124 を 付け て 
TK "PC 
© 144 THX Bl EH3-8-20 

上 屋 和 文 


$PiO'84 年 10 月 号 を \0.5K. 
ത 243-04 神奈 川 県 海老 名 市 国分 1834- 
27 

深 畑 謙一 


@ `“ H ---FX-602P+FA-1+ > u W£ > — 
ム の 本 [3] 
貴方 …BASIC の 使え を る ポケ ュ コン (PC 優 
ж) 
© 414 静岡 県 伊東 市 宇佐 美 1830-2 

内 野 博樹 


— 


Y 4-.PC.6022(22—7u» 27) 
ンタ 々 ) 

貴方 … そ の 他 の PC-6001 用 プリ ンタ , 3 
^, JR-100 を \10K で 買い ます . 


© 662 兵庫 県 西宮 市 川東 町 4-2-301 
# HFEA 
@`⁄ -.:2773)-യയ്‌ച- + ә —– 


トリ ッ ジ 2 本 
貴方 …PC1261。 1350, WTC. 
© 409-01 山梨 県 北都 留 郡 上 野原 町 上 
野原 2062 
小林 勝彦 


珍 当 方 …FM-7 十 RF コン バー タ 十 (カラ 
—TV) š 

貴方 …MZ-2000+G-RAM I , II, III 2-5 
張 1/O ポ ボート, MZ-80B+G-RAM I +I/ 


O ボ ポー ト 
017 秋田 県 大 館 市 池内 185 
佐藤 昭彦 


Y 5 ---MZ-2000+G-RAM I, II, Ш. 


貴方 … え 1 用 コン パクト ・ プ ロッ ピー ディ 

スク ドラ イプ 十 ( イ ンタ ター フェイス)。 š 

だ は 70K で 売り ます . WTTC. 

т 203 東京 都 東 久留 米 市 下 里 4-1-1-310 
үш Ж 


Y 7; PB-400 а 
Ж>--РС-1251, 55, 45, 61, 1401. 
൬ 648 橋本 市 橋 谷 602-2 

男 川 忠治 


Y 47; ---PC-6001 + PC-6006 + PC-DR311 
ft 方 …PC-1501 十 (CE-151) + CE-150 + 
CE-152 

© 144 東京 都 大 田 区 新 蒲 田 2-13-11 


V ` H ---PB-100+OR-1+FA-3+ 4&3 H 

+а 

貴方 …PC-1251。 55, 61+ (CE-124) 

© 720 広島 県 福山 市 北 吉津 町 844 
山本 卓司 


൭. ..1%. 7001 + ж 
貴方 …FX-602P 十 本 ( 他 の ポケ ュ コン 可 ) 
WT. 
т 039-44 
12 

山田 俊一 


青森 県 下北 郡 大 畑 町 上 野 22- 


疹 当方 …MAX マ シー ン 二 デー タ ・ レ ュ コ 
ー ダ 十 カ ー ト リッ ジ 4 本 十 ジ ョ イス ティ 
vy 2+ aq 
貴方 …PC-1251 十 カモ ッ ト ・ イ ンタ ー フ 
2w A WORT 
© 371 群馬 県 前 橋 市 亀 泉町 454-3 

EIC Led 


Y 7; ---PB-100- OR-1-- FA-3-- FP-12 

貴方 …PC1501orPC-1500 

© 245 横浜 市 戸塚 区 和泉 町 1262 
鈴木 哲哉 


Y 当方 …JR200 十 本 

貴方 …PC1501 十 CE-150 寺 CE-151orCE- 

1955. 

© 480-03 愛知 県 春日 井 市 神尾 町 280 
倉知 克 仁 


Ф)--ЕМ-7-ЕЕже/-м-ж 

買 方 … コ モ ド ー ル 64 十 DISK. WFT. 
© 868 熊本 県 人 吉 市 駒井 田町 210 
岩 租 隆史 


Ф:4)---РВ-100--ОК-1--БА-3-- Ж. 

貴 方 …PC-1245 十 CE-124。 PC-1250 (+ 

CE-124), PC-1251( +CE-124). TEL # # 

ぃ いて W〒 で . 

© 283 千葉 県 東金 市 砂 古瀬 500 
飯高 信 衛 


є 7 --MZ-721*a 

貴方 …PC-6001+ (デー タ ・ レ ュー タダ). W 
TE. 

т 193 東京 都 入 王 了 市 散 田町 5-4-15 


小高 将 


Ф 7; FX-802P-- FA-3-- 44 HE. 
貴方 … パ ソン コン 。 Ж аи, പും 


F, プロ 電 な ど . まだ は 売り ます . т. 
W шағ 
Ф 491 愛知 県 一 宮 市 千秋 町 天 摩 字 氏 神 
30 

千田 恭一 


疹 当方 …SG-1000 十 カートリッジ 3 本 十 
РС-1250--СЕ-124 
貴方 … フ ァ ミ リー コン ピュ ー タ 二 カ ー ト 
リッ ジ 3 本 . また は SG-1000 ഗോ 
Ed, Tr. 
© 503 岐阜 県 大 垣 市 林 町 7-762-1 

若松 忠弘 


V 当方 …PC-6001 十 PC-6006 十 コン パイ 
> +PB-100+ ж 
It Jj --- PC-1261-- CE-124, РС-1350--СЕ- 
124 + (8K RAM), РС-1500--СЕ-150-- 
8K RAM+ 2 7T7—7. また は \38K で 
V b i d. Wert. 
© 520-23 滋賀 県 野 州 郡 野 州 町 新 上 屋 
233 号 

жн м 


Ф 7;---PB-100-4- 2+ a 

貴方 … フ ァ ミ リー コン ピュ ー タ 二 カ ー ト 
リッ ジ . 手 渡し 希望 . TEL( 月 一 金 の P.M. 
T : 30 一 9 : 00), МТ, 


© 281 千葉 市 幕張 町 1.4772 ニュ ー エ 
イト 本郷 2-101 
大 沢 隆太 ® (0472) 72-4691 


@ ` H ---MZ-731- » > — CRT + PCG- 

700+ AID + Ж 

Bb: :FM(NEW)-7+CRT+>— 5 + 1 

ュー ダ 。 М2-1500--СЕТ--ОПр5Ж. 

© 361 埼玉 県 行田 市 持田 4-27-18 
武田 紀之 


$ 当方 …SG-1000 十 デジ ョ イス ティ ッ ク 十 
カー トリ ッ ジ 3 本 
貴方 … フ ァ ミ リー コン ピュ ー タ 二 カ ー ト 
リッ ジ 3 本 以上 十 (BASIC)。 WFT. 
© 311-24 茨城 県 行方 郡 潮 来 町 辻 1699- 
12 

宮本 /Ж 


Y 当方 PCG-700 十 AID 二 Z 

貴方 …700 用 カラ ー プ ロッ タプ リン タ 
© 370 群馬 県 高崎 市 新保 町 1312-17 
田中 秀樹 


EEE 


画 表 紙 の 中 に 銃 を 持っ た 渋い (? ) 男 の 写真 が 2 枚 入 っ て いま す 
が , 実は これ , I/O の K。 氏 な の で す . EH, 韓国 の 済州 島 で ロケ を 


し だ も の で す . ちな み に , この と き の 銃 に は 弾 が 入っ て いま せん . 


со, まだ 血 が し た だ っ て いる 本 物 の キジ を 手 に し た 写真 な 
ども 撮影 し た の で す が , きす が に ユン レ に は 気持 ち 悪 が っ て 体 か ら 
遠ざけ て 持っ て いま し た . と に か く 最 初 は 銃 を 持つ 格好 が 様 に な 
ら な く て , 射撃 場 の 人 に し ご か れ て いま し た . (A) 


| 画 今 年 も 残す し ころ あと 数 日 と し なり まし た . こ の 1 年間 に 投稿 し て 


くれ た 多数 の 読者 の 方 に は 心から お 礼 中 し 上 げ ま す . そし て , せ 
っ か く 〈 く の 貴重 な 時 間 を 使っ て 投稿 し て くれ だ に も か か わら ず , Ж 


念 な が ら 不 採用 ほな っ て し まっ た 方 に は 心から お わび いた だ し ます . 


さき て, 迎え る 1985 年 も PiO 編 集 部 一 同 . な い 知 恵 を し ぼっ て 楽し 
ぃ 企画 を お 届け し た いと 思い ます の で , 今年 同様 よろ し くち お 願い 
し ま ー す 。 (О) 


ന ന തത്ത 
AN ア が ひら めい た 私 は , PiO で 一 儲け し よう と (?) 手 近 に ある コン 


定期 購読 に つい て 
予約 申し 込み は 1 年 間 を 原則 と し ます . 


1 年 5.000 円 (送料 菩 ) 
551755 
〒151 東京 都 渋谷 区 代々 木 1-37-1 ぜん らく ビル 5F 
株 式 会 社 工学 社 


PiO 1985 年 1 月 号 28% 15 G 2835105) 
発行 人 ж 正明 

編集 人 Ж 昭 助 

f Ж PiO 編 集 部 
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151 東京 都 渋谷 区 代々 木 1-37- 
振替 口座 東京 5ー22510 TELEX J25959 


印刷 : 凸版 印刷 (株 ) 


ニー 


ピュ ー タ に 向っ て キー を た た だ たき 始め た の で し た . そし て ある 程度 W 
"この まま で は ⑬ に きれ て し まう , も っ Ü 
と 面白 い 機能 を 付け 加え な く て は …” と 思い , いろ いろ な こと を W 
考え 出 そ う と し まし た . ы 
LIA», 世の中 は それ ほど 甘く な いよ う で す . それ を 付け 加 W 
えた ら ゲ ー ム が 極端 に 遅く な っ て , と て も ゲー ム と は 言え な いも W 
の に な っ て し まう で は あり ませ ん か . 結局 この ゲー ム は 私 の 手 で Үү 
DULI, 今 で も 私 の ディ スケ ッ ト の 一 部 で 細々 と 生活 し て いま W 
+ (な ん と か 完成 きせ よう と 思っ だ た の で す が ね ぇ ). (V) W 
た ま に は 止 Ü 
と 考え た て いる \ 


田 大 古 の 昔 か ら 時 間 は 止ま っ た た めし は な いけ れ ど , 
V 誰 も 文句 は 言わ な いで し ょ Э. 
うち に 時 間 は 刻々 と 過ぎ て いっ て し まう の で , これ で 終わ り に し W 
ます . (Y2) | / 
ജ 7 月 号 で 眠れ る 森 の 館 の 話 を し まし た ね . な , な ん と 僕 も その W 
(Shu) W 


HoT AVC Rs 


一 味 に 片足 あ … う … う 。 さぁ て 寝よ う 


ix Pik 
④ 郵 便 振替 (88535-22010) 

裏 の 通信 欄 に , 必ず PiO 何 月 号 か が から ご 希望 が 明記 し て くだ さい . 
ORTEZ 
③ 定 額 小 為替 

xg O-—907i& CCS «I|! eU. 

(1.000 円 以上 の 切手 代用 は ご 遠慮 願い ます ) 


e COME ST 
を 同封 し て くだ さい 


昭和 60 年 1 月 1 日 発行 (毎月 1 回 1 日 発行 ) 


1 
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Ок) B (03) 370-330100 
(E) ® (03) 320-121800 

定価 480 円 


ぜん らく ビル 5F 


ж 


ШЕЙХ 


- П 
高 レ ベル で 勝て る よう に な っ たら 、 他 流 試合 も 免許 皆伝 Mera 
Y 4,800 
フェ ッ シ ョ ナル 麻雀 〉 は 、 アセ ンプ ブリ コン ピュ ー タ の 手 牌 を 見 る こと が で きる 


プ 


H 
言語 で 記述 され 最高 速 で 動く 本 格 的 な 


ゲー ム ・ ソ フト で す 麻雀 の 忠実 な シミ ュ 
レー ショ ン に 基づい て 組立 て られ て お り 、 
ゲー ム は 実戦 その まま に 展開 し ます 


あー デン モー トド 、 コン レビ ュー タダ だ が だけ S 
対戦 する デモ ・ モ ー ド も あり ます 。 
同じ 配 牌 か ら の 再 ゲ ー ム も 可能 で 、 初 
心 者 の 実力 アッ プ に 役立ち ます 


リー チ は も ちろ ん 、 つ み 場 、 裏 ド ラ 、 五 
本 場 以 上 二 翻 し ば りな ど 、 ル ー ル は 実 
戦 そ の まま で す 
実際 に ある 麻雀 の 役 は 、 す べ て 綱 羅 
され て いま す 


新しい 思考 ルー ナン の 開発 ( I T. 
コン ビュ ー タ の 実力 は 最強 に 設定 で き 
ます 最高 レベ ル で コン ピュ ー タ に 勝て 


れ ば 、 あ な た の 実力 は か な り の も の で す 。 


対戦 相手 の スピ ー ド (は 8 段階 に 設定 で き 、 
食い 断 、 不 聴 罰 の 有無 も 選択 で きま す 。 
チー、 ポ ン 、 カ ン 、 ロ ン が で きる と き に は 、 チ 
ャ イム が 鳴っ て ゲー ム の 進行 が 止ま り ま 
す 。 実 戦 の 緊張 感 を 味わい た いと き に は 


停止 し な い 実 戦 モ ー ド に 切り 換え られ ます . 
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※E は 表 と は 区 別 し 、N5200 の 8" は X 9,800, JX 023.5'(4: 


Y 7,200 と する 。 
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e バー ジョ ン 2.0 _e48P マ ニュ アル 付 


a guarantee for software that won't wear 


株 式 会 社 シヤ プア アール 


T!02 東京 都 千 代田 区 隼 町 2-I2 藤和 半蔵 門 コ ー プ 405 号 


Tel. (03) 234-0950 
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も う 特 別 | な 存在 で 8 fac 


ルナ な メデ ティ っ て きた 。 
スソ コン Mr. РС 


時 代 が テレ ビ と パソ コン を 
പു uet 同 9t 


に ワー ブロ まき 
ソナ ルコ ンピュータ 
トー キー ボー ド 
NPC テレ ビバ ンコ ン ン 7. P M 55. 00009 
൫ ディ スプ レイ テレ ビ 
L (Е Vi 標準 価格 94.800 円 
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日 本 電気 グレ ー プ NEC パ ソコ ン イ ン フ ォ メ ーション セン ター 
A 7108 東京 都 港 区 三田 三 丁目 14-10( 明 治 生命 三田 ビル ) #(03)452-8000 
電話 番号 を お 確か め の 上 お か け く だ さい 。 
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コン ピュ ー タ PYK コミ ュ ニ ケー ショ ン 


ジコ ン 。 誰 も が 気軽 に 自分 の 好み に し た が っ て 使え る ーー 一 
を そん な カジ ュ ア ル な イメ ー ジ で PC-6001mk SR は や っ て きま し た 。 PC-6000 シリ ー ズ の 思 
想 を 受け 継ぎ 、 より 大 きく 飛躍 し て 誕生 し た パワフル マシ ン 。 
きら に 数 々 の 新 機能 を 加え て デザ イン も 一 新 。 まさ に ライ ヴ な 興奮 を 引き 起こ す パ ソコ ン で す 。 


ബോ PC 6001 mills H 9.800 由 


豊か な ソフ ト 群 も すべ て 継承 し 、 


O 高 性 能 は ヒト と や る し する, 
оу Ry | 
NECO パ ソコ ン フ デリー 
PC 2000 ヨ リーズ /5 x PC 600lmuIL/ 5: ару-Х о PC 600Imklln / 2° РС66О 
A “© PC660l n. 5 ww PC800lmull / РС-8900:2Л)-Ж/ 59 PC 880іткі 
РС-1005)—Х/ 2: リズ PC9801B/ 7% PC 980: / N5200 ゃ テル 5 


雑誌 17673-1 
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